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TOUT BAIGNE DANS LHUILE ! 



APPLE: LE COMMENCEMENT 
DELAFIN 



CRACHEUR DANS LA SOUPE 

Nous n allons pas faillir a noire re- 
putation de cracheur dans la 
soupe ipies avoir deblalere sur le 
bide >nformatique Irancais. nous 
nous attaquons aujourd hui au ires 
ioii flop que semble nous preparer 
noire m e pal o- marque preleree. j'ai 
nomme Apple ' 



APPLE. TEXAS 

Reparions un peu 
de Texas il y a 
mamtenant plus 
d un an que le 
Tl 99 est arrete . 
mats le rappel * 
' i son histoire va t 




lies .uule. 
Quand Texas a annonce qu'tl se re- 
iirait du marche de la micro-infor- 
matique c est bien evidement parce 
qu'il petdait du fnc en pagaille sur 
ces produils Les amencams n'onl 
pas fait de detail toutes les filiates 
de to us les pays ont stoppe en 
meme temps la distribution de leurs 
ordinateurs lamiliaux que le mar- 
che local soil rentable ou pas Et. 
precisement. Texas France marchait 
du feu de Oieu Jean-Michel Perbet. 
alors Oirecteur fles ventes de Texas 
France let passe aepuis chez Sony), 
avail implante les prcduits de la 
marque de facon magistrate et le 
chiffre d affaires suivait sans pro- 
bleme Ces excellenls resultals 
n'onl evidemment pas empeche 
Texas de termer sa lili ale franchise 
pour ne plus se consacrer qu'aux 
calculat rices. 



Aujourd'hui que se passe-Ml chez 
Apple ? Le chiffre d'affaires mondial 
se casse la gueule bien comme il 
faut des quelques 700 millions de 
dollars de lannee derniere les pro- 
visions pour cette an nee passe a 
400 millions, 40 % de chute ' Les 
teles pensantes du groupe foutem 
le camp en courant depuis Ian- 
nonce du depart de Steve Wozniak 
(co-fondateur d'Apple avec Steve 
Jobs) parti le Grazziano Directeur 
financier, barre le Richardson Direc- 
teur des ventes. envoles les Direc- 



A MACINTOSH 

teurs de marketing de I' Apple II et 
de Lisa et, en plus. Markkula. un 
des plus gros actionnaires de la 
boite. vend la quasi totalite de ses 
parts vite fait ' C est tout mauvais. 
ca Ca sent pas vraiment bon. D'au- 
tant plus que quatre usines du 
groupe (celle d'lrlande. celie de Sin- 
gapour et deux America ines) fer- 
ment leurs portes pendant une se- 
maine pour cause de surstock 

BOULETTES 

Comment Apple en est-il venu la ? 
Plusieurs evenements se sont 
cumules et pas des moindres. 
D'abord, la gamme Apple II est 
vieiiJe. tres vieille et si nous consi- 
derons encore en France que ces 
engins ont leur avenir devant eux. 
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A APPLE IIC 



, , par definition 
sont des consommateuts plus glou- 
tons et plus averts, pensenl plutdt 
que les Ife et He font dans le dos 
(leur avenir Merci Pierre Dae) 



AH 1 LA BELLE IMAGE 

Autre boulette ; toute fa politique 
marketing et promotion onl ete axes 
sur le Macintosh et le lie est passe 
du stade de vedette a cetui de der- 
niere roue du carrosse. Le peu de 
publicite auquel a eu droit cette 
gamme s est axee sur le lie, anti- 
these du lie dont il ne reprenait que 
les defauts (gestion d'ecran deplo- 
rable, micro- processes r d e passe i 
pour oublier ses rares qualites (con- 
viviality des cartes, ouverture du 
systeme) Envolee la belle image de 
marque de la serie II. 

MACINTHEBABA 

Bol, tant pis. on sen tout, on a le 
Macintosh, la bete de course des 
annees 90 Avec ce fabuleux engm 
au diable le lie I Mais le probleme 
cest que le Macintosh n'est ni un 
ordinateur personnel ni un ordina- 
teur professional. II n'y a guere 
que les francos pour balancer plus 
de 30.000 francs pour une machine 
qui n'a d'mteret que pour les snobi- 
nards qui conlondent i'mform. tique 
avec la bimbeloterie decorative Les 
quelques 500000 acheteurs mon- 
diaux prevus pour 19S4 se son' ff- 
nalement relr^uves 150 000 i 
comons (as pi so ma lite" s qui, <>n 
seulement r/oi " pas pay6 leurs n a- 
chines mais. en plus, ont louche le 
forts beaux cachets pour en (aire la 
promotion. 

VOUS aVEZ DIT NOUVEAU ? 

Enfin, pour corset le tout, il y a les 
nouveautes annoncees par les 
"peljts confreres' Atari n'est vrai- 
ment pas gentil et. avanl meme 
qu'il ne sorte, le Mackintosh" (nou- 
vel ordinateur d Atari atta quant di- 
rectement le Mac avec la couleur el 
un prix inferieur de moitiei est pres- 
qu'aussi connu que le Macintosh 
sans un rond de publicite ! Le nou- 
veau Commodore, vraiment porta- 
ble, avec un ecran plat incorpore va 
se larcir le lie avec un prix pas pos- 
sible et le nouveau 128 Ko devrait 
bouffer le He grace a une compati- 
bility avec les softs Commodore qui 
sont aujourd'hui presqu'aussi nom- 
breux que ceux d'Apple. 
L'amvee des MSX japonais ne 
va probablemenl pas arranger 
grand -chose. 



CINOCHE-TELOCHE 

Plefn les mirettes, pages 14 et 15. 



DEULIGNEURS 

Les faineants sont a la page 11 



FORMATION A LASSEMBLEUR 

Le prof et r amateur eclairs vous attendant a la page 19. 



SNIFF 

Et puis, ce qui est plus triste e'est 
que. pour une lois. je regrette pres- 
que ma mechancete maladive 
J'aime bien Apple et j'aurais vrai- 
ment du mal a me passer de mon 
vieux lie tout pourri Et, quand je 
vois des signes avant-coureurs de 
panique, ca me chagrine un peu 
(mais. rassurez-vous. pas long- 
temps). Les signes en question 

RIEN 

NE VA PLUS ! 

PASSE ENCORE 

QUE LES 

PETITS 

FABRICANTS 

AIENT DES 

PROBLEUES 

MAIS 

APPLE 

ET 

IBM! 

LA HONTE ! 

sont lannonce dun "nouveau mate- 
riel' destine a prevenir les attaques 
imminentes de la concurrence et qui 
n'est qu'un lie "ameliore" : le He 
avec le micro-processeur du lie 
avec quelques ameliorations du gra- 
phisme. Sachant que I autre nou- 
veaute est Lisa rebaptisee Macin- 
tosh XL avec un grand coup de 
ciseaux dans le prix de vente, ca va 
etre dur de lulter avec cette gamme 
de nouvelles nouveautes pas tres 
nouvelies 

OPTIMISME BEAT 

Allez. je termine sur une note opti- 
miste : Apple est vraiment mal 
barre et Jean-Louis Gassee, I'effi- 
cace PDG d'Apple France ne pourra 
pas (aire crand chose avec le chiffre 
d'affaires Irancais qui. s'il est ex- 
plosif ici, n'est qu'un pauvre petit 
petard mouille dans le manque a 
gagner mondial 

Suite page 16 



ATCHA ! 

Cette semalne, EDIKA est en" page 17. 



BIDOUILLE GRENOUILLE 

Ou comment trlcher, piratet, modifier, traflque:, magoulller, 
bldoulller et grenouiller avec les loglclels du monde entler. 
Mais dans la legalite. au moins ? Of course, mon general ! 
Lire page 9. 



IBM: LA FIN 
DU COMMENCEMENT 



V ANNONCE FATTE AU RAVI 

Nous sommes maintenanl habitues 
a lannonce de catastrophes du 
style arret de production, fermeture 
d'usine. depot de bllan ou autre ga- 
terie qui comble de joie les heureux 
proprietaires de ce micro qui 
nexiste deja plus alors qu'ilsn'ont 
meme pas fini de lire le mode 
d'emploi 

Generalement, ce sont les pelites 
boites qui Irinquent, elles onl es- 
saye avec les moyens du bord de 
lancer le produit qu'elies aoyaient 
genial et qui n'est qu'un ersatz de 
plus. 




Mais quand on prononce Apple. 
Atari. CBS. Commodore ou Texas, 
pas de probleme les geanis ne se 
'rompent pas. le ioyeux consomma- 
peut dormir sur ses deux oreil- 
les Quant a IBM, le consommaieur 
jeut meme se procurer une 
:roisieme oreille aucun debut de 
commencement du moindre signe 
d'aterte n'est possible ' 

MONCCL! 

Bon, ben. rate < Geant ou pas, 
Texas arrete son ordinateur familial. 
CBS jette son Adam aux orties. 
Atari se fait rachetcr pour une bou- 
chee de hamburger. Commodore 



sort un nouveau modele toutes les 
cinq minutes tenement il panique et 
Apple ferme ses con serve ries de 
pommes (Voir article dans ce nu- 
meroi Qu'il soit petit David bi- 
douille ou grand Goliath pognon, 
nul n'est a I'abri de ce mal qui les 
ronge : I'erreur de marquetingue 

SYNTAX ERROR 

Mais IBM ? Syntax error ' Un peu. 
mon neveu I Cest la semaine der- 
niere que lannonce officielle a ete 
faite : IBM se retire du m-.rtn'e de 
lordinateur familial et stoppe la fa- 
brication du PC Junior I 'Retrait 
provisoire', dit le communique, 
mais retrait quand meme ' 

FAS DE SURPRISE 

Vous vous souvenez probablemenl 
du PC Junior, il a suflisamment fait 
parler de lui lors de sa sortie, rl y a 
plus de six mois. Hachette en avail 
achete un au marche noir de New- 
York et il est reste expose plusieurs 
semaines dans une vitrine de 
riper? alors qu'lBM France niait 
ji-squ'a son existence 
Clavier mou, fabrication asiatique. 
plastique toe, performances res- 
treintes. catalogue de logicieis ultra- 
mince, prix exorbitant, rien de bien 
excitant el la carriere de la vedette 
tourne en eau de boudin . on garde 
la siariette pour le marche interieur 
a me ri cam 

Les ventes suivent la qualite de la 
mactiine nulles ' 

LE CHANT DU CYGN1 

En janvier dernier, pendant le salon 
de Las Vegas. IBM fail un petit lif- 
ting a son Junior, change son cla- 
vier, lui adjoint un moniteur couleur 
et vend le tout a 500 S soit 50 % 
moins cher que le prix de depart i 
On se doute bien que cette opera- 
tion est destinee a ecouier les 
stocks, mais comme IBM annonce 
la sortie imminente dun nouvel IBM 
J compatible avec le Junior, per- 
sonne ne se mefie et les queues de 
stocks patient comme des petHs 
pains. 

Suite page 16 



Cest nouveau, pa vient de sortir : 

Lactualitede la micro-mtormatique. Ure pages 9,10, 



CONCOURS PERMANENTS 

Voire programme, non content de vous rapporter 1.000 
franca par page publiee, peut vous rapporter 20.000 
francs chaque mois ou un voyage en California pour deux 
cheque trimestre. Reglement an page interleure. 



DES PROGRAMMES POUR VOTRE ORDINATEUR : AMSTRAD 

APPLE lie et lie. ATARI 800 XL . CANON X-07 . CASIO FX 702-P. 

COMMODORE 64 ET VIC 20 . EXELVISION EXL 100 . HECTOR HR . 

MSX et compatibles . ORIC 1 ET ATMOS . SINCLAIR ZX 81 ET SPECTRUM. 

^ JANPY TRS 80 . TEXAS TI-99/4A . THOMSON T07, TO7/70, ET M0 5. 
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Allemagne 3.50 DM - Belgique 77 Frs - Canada 2,50 S - Luxembourg 74 Frs - Suisse 3 Frs - 
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ECHEC 



"ATARI 



Un bon graphisme pour un jeu trds populaire. Les deux 
joueurs s'affrontent a armes egales, mais attention, 
lordinateur contrdle la legalite de vos coups. 

Philippe JACQUOT 



SUITE DUN' 75 

1147 IF A6SCNHD-1 THEN ATT=1 :NE=1 :C0C8i= 

PHCIXLIC01-PUCI] :RETURN 

1146 J=SGN[NHJ :FOR U=l TO A6SCNHJ-1 1IF G 

RCPHCIl-U*J,PUCi:n>=0 THEN U=500 

1119 NEXT U 

1150 IF U<500 THEN ATT=l:GOSUB 4000:RETU 
RN 

1151 IF nBStPHC16*SJ-PHC32-SJ]<2 AND ABS 
fPU(16*S)-PUC32-S)3<2 THEN ATT=2=RETURN 

1152 RETURN 

1200 REfl *.*.*. FIN DE PARTIE *** 

1201 POKE 53246,0 

1202 GRAPHICS 0:SETCOLOR 2,0, :A=PEEK(56 
0]-t256*PEEKtS61):POKE A*3,70:POKE A*6,6= 
POKE 752, ]:? " » ECHECS *" 

1203 POSITION 5,7:? "ABANDON FORCE OU JO 
UEUR " ; 

1204 IF PAT>0 THEN ? P+l POSITION 5,12:? 
■PAT REALISE PAR LE JOUEUR " ;ABSCP-2J :G 

0T0 1206 

1205 ? ABSCP-2) : POSITION 5,12:? "MAT REA 
LISE PAR LE JOUEUR ." ;P*J 

1206 POSITION 5,18:? "POUR ENTAMER UNE N 
OUUELLE PARTIE" iPOSITION 5,13:? "ENTRE2 
START" 

1207 POKE 53279,0 

1208 IF PEEKC532733=6 THEN RUN 
1203 POKE ?7,0:GOTO 1206 

1360 REn t*t JOUEUR *** 

1301 IF P=0 THEN POSITION 2,3:? " " 

:PnSITION 32,3:? " " :RETURN 

1302 POSITION 2,3:? " " ! POSITION 32 
,3:? " "iRETURN 

1400 REfl *** RECHERCHE CASE *«* 

1401 IF STICKCPX>7 OR A0>=8 THEN GOTO 1 
403 

1402 A0=A0+1 :FOR 
500: RE TURN 

1403 IF STICKCP] 




1 TO 4:NEXT H:GOSUB 1 

1 OR A0<=1 THEN GOTO 

FOR H=l TO 4:NEXT H:GOSUB ] 



1404 A0=A0- 
500: RET URN 

1405 IF STICKCPX>]4 OR B0<=1 THEN GOTO 



1486 B0=B0-HFOR H=l TO 4 :NEXT 
590: RE TURN 

1487 IF STICKCP3 



GOSUB 1 
3 OR B0>=8 THEN GOTO 
1 :FOR H=l TO 4iNEXT HI60SUB 1 
^8 OR 60<=n 



THEN GOTO 141 1 




1410 A0=AB+1 :80=80-l :FOR H= 


TO 4:NEXT 


■GDSUB 1500:RETURN 




1411 IF STICKCPJ05 OR CA0> 


OR B0>=8 


THEN GOTO 1413 




1412 A0-A0H :60-Ba-H:FOR H= 


TO 4:NEXT 


iGOSUB 1508:RETURN 




1413 IF STICKCPK>3 OR [A0< 


1 OR B8>=8 


THEN GOTO 1415 








:GOSUB 1500:RETURN 





1415 IF STICKCPX>]8 OR CA0<=1 OR B8<=1) 
THEN RETURN 

1416 A0=A0-1 :B0=80-1 :FOR H=l TO 4 :NEXT H 
IGOSUB 1500:RETURN 

1508 REM *** SON RECHERCHE *** 

156] FOR H^l TO 5:50UNO 0, 180, 14 , 3 :NEXT 

H:SOUND 0,0,0,0:RETURN 

1608 REM *tt CLIGNOTTEMENT 1 **< 

1601 POKE 77.0:U0=GRCP0,B0):U-W0:IF U<0 
THEN GOTO 1666 

1602 A=A0:B=B0:ON GIA0.B0J+1 GOSUB 501,5 
02=FOR H=l TO 5:G(A0,B0)=A8SCGCA0, 801-1) 
=NEXT H 

1603 ON GCA0.B0J+1 GOTO 1694,1603 

1684 GCA0,B8J=1 :GGSUB 583:F0R H=l TO 10: 
NEXT H iRETURN 

1605 GCP0,B0J=0:GOSUB 503:FOR H-l TO 10." 
NEXT HiRETURN 

1606 A=A9:B=B0:ON G(A0,B6)+] GOSUB 581,5 
82:F0R H-l TO 5iNEXT H :GCA8,B0J=ABS(G[ A9 
,B0)-n 

1607 ON GCA8,B0)+] GOSUB 581,582:F0R H=l 
TO 10:NEXT H:G£A0,B8) = ABStG(A0,B0)-n:R 

ETURN 

1700 REM *** MESSAGE IMnOBILITE *** 
1781 POSITION 3,22:? "CETTE PIECE NE PEU 
T PAS BOUGER !!" 

1702 FOR 1=225 TO 128 STEP -4iSOUNO 0,IN 
TCI'4X60,10,3:NEXT I 

1703 FOR 1-120 TO 225 STEP 4:S0UND 0.INT 
(I'41*-68,10,3;NEXT Is SOUND 8,0,8,0 

1704 POSITION 3,22:? ■■ 

■■ :RETURN 
1806 REM **t PIECES CHOISIES •** 
1881 POKE 7B3*BG-4*INTCBG'51,CG:POKE 532 
«7>BG.88*8iAG:RETURN 
1900 RED **% CLIGNOTTEHENT 2 *** 
1981 POKE 77,0HF GRCA8,B8X8 THEN GOTO 
^■964 

1302 A-A0:B=80:GCA0,80)=A8SCGCA0,B0)-1 J: 
GOSUB 503:FOR H-l TO B:NEXT H 

1303 GCA0,B0J>ABSCGCA0,B0}-1):U=GRCA8,88 
l:GOSUB 503:FOR H-l TO ]0:NEXT H:W=U0:RE 
TURN 



1304 A=A0:B=B8:GtA0,B0)=ABS(G(A9,B81-n: 
GOSU6 503:FOR H=l TO B:NEXT H 

1305 ON GCAe.BOJ'l GOSUB 501,502:FOR H=l 
TO 10INEXT H:GCA0,B8)=ABSCG[A0,B0)-1J:R 

ETURN 

2880 REH *** TEST CASE D'ARRIOEE *** 

2901 IF UI-16*P>8 THEN GOTO 2011 

2002 TR=]:IF CNTCUXl THEN TR=2 

2883 IF ABS(A0-A1]>1 THEN UAL=1 :RETURN 

2004 IF P-0 AND CB0>B1-1 OR B0<B!-TRJ TH 

EN UAL-1 [RETURN 

2885 IF P=l AND CBB<B1»1 OR B0>B1+TR) TH 

EN UAL=1 :RETURN 

2806 IF A0OA1 AND INTIGRCA9. 891^17) OAB 

SLP-1J IHEN UAL-l:GOSUB 1080:RETURN 

2007 IF A9=A1 AND GRCA0, B9X>-1 THEN UAL 
= 1 : RE TURN 

2008 CNTtLI)=CNUW} + ] HF A8SCB8-B1 1=2 THE 
N GOSUB 2100 

2003 IF B0-?*P+1 THEN COP=l 
2910. RE TURN 

2811 IF W-16*P>10 THEN GOTO 2020 

2012 IF GCA0,B0JOGCA1,B1) THEN UAL=1 :RE 

TURN 

2913 IF ABSCA0-A15OABSCB0-B1J THEN UAL= 

1 : RE TURN 

2014 I=SGN{A0-A1) :j=SGNCB0-Bn 

2015 IF ABSCA0-AIX2 THEN GOTO 2018 

2016 FOR K-I TO A0-A1-I STEP I:IF 6RCA1+ 
K,B1»J*ABSCKJ)0-1 THEN UAL-1 

2017 NEXT K 

2018 IF INTCGRCA9,B9)^17J=P THEN UAL=1 :R 
ETURN 

2813 CNTCUJ-CNTCUJJ'l :RETURN 

2820 IF W-16*P>!2 THEN GOTO 2027 

2921 IF GCA0,B0)=GtAl,Bn THEN UAL=1 :RET 

URN 

2822 IF ABSCA9-A1X] OR ABS(B0-A]J>2 THE 

N UAL-1 :RETURN 

2023 IF ABSCA0-A11=2 AND ABS[B0-B1X>1 T 
HEN UAL=1 :RETURN 

2024 IF ABSCA0-A1J=1 AND ABSCB0-BI X>2 T 
HEN UAL-1 :RETURN 

2625 IF INT[GRCA9,B0]^17)=P THEN UAL=1 :R 

ETURN 

20?6 CNTCU1-CNTCU1-M :RETURN 

2027 IF U-16*P>14 THEN GOTO 203& 

202B IF A0OA1 AND B0OB1 THEN UAL=l :RE1 

URN 

2023 I»SGN[A0-A1]:J=SGNCB0-Bn 

2039 IF ABSCA0-A1X2 THEN GOTO 2033 

2931 FOR K=I TO A0-A1-I STEP I=IF GRCAlt 
KiBllO-1 THEN UAL=1 

2932 NEXT K 

2033 IF ABS£B0-B1D<2 THEN GOTO 2036 

2034 FOR K=J TO B0-81-J STEP J :IF GRCA1, 
Bl+KJO-1 THEN UAL-1 

2035 NEXT K 

2036 IF iNTCGRCA0,B01'171=P THEN UAL=1 :R 
ETURN 

2037 CNTCW)=CNTtU)+l iRETURN 
2838 IF U-16*P>15 THEN GOTO 2057 

2033 IF A0OA] AND 80OB1 THEN GOTO 2043 

2040 I=SGNCA0-Al):J-SGNtB0-BU 

2041 IF ABSCA0-A1K2 THEN GOTO 2044 

2042 FOR K-I TO A0-A1-I STEP I:IF GRCA1+ 
K,81]<>-1 THEN UAL=1 

2043 NEXT K 

2844 IF ABSCB0-81K2 THEN GOTO 2847 

2045 FOR K=J TO B0-B1-J STEP J :IF GRCfll, 
Bl+KJO-1 THEN UAL=1 

2046 NEXT K 

2047 IF INT(GRCA0,B0J^1?J=P THEN UAL»1 :R 
ETURN 

2048 CNTtU)=CNTCUJtl :RETURN 

2843 IF GCA9,B0JOGCAl,Bn THEN UAL=1 :RE 
TURN 

2050 IF ABSCA0-An<>ABStB0-Bn THEN UAL= 
1 ^RETURN 

2051 I=SGNCA0-An:J=SGNCB0-BI3 

2052 IF ABSCA0-A13<2 THEN GOTO 2055 

2053 FOR K»I TO A0-A1-I STEP I:IF GRCAU 
K,81tJ*ABSCK)K>-I THEN URL=1 

2054 NEXT K 

2055 IF INTtGR(AB,B0]'17>P THEN UAL = 1 :R 
ETURN 

2056 CNTCUJ-CNTCUXl :RETURN 

2057 IF A8SCA0-A1JJ2 OR ABSCB0-B1)>1 THE 
N UAL=1 :RETURN 

2658 IF A8SCA0-A1) = 2 THEN GOSUB 2280 :RET 

URN 

2059 IF INTCGRCA0,B0V17]=P THEN UAL-1 :R 

ETURN 

2860 CNTtUJ-CNTCul)»l :RETURN 

2100 REM tit OPTION PRISE EN PA *** 

2101 IF P-B THEN H=UI-1 :PEPCH)-COUP:LEPCH 
1=B8:RETURN 

2102 H-U-9:PEPCH)-C0UP:LEP[HJ=B8:RETURN 
2208 REM *** TOQUE lit i 

2281 IF B0OS! THEN UAL=|:RETURN 

2282 IF CNTCU1O0 THEN UAL-l:RETURN 

2203 IF A0=A1*2 AND CNTCU-23O0 THEN UAL 
= 1 :RETURN 

2204 IF A0=Al-2 AND CNTCU-3JO0 THEN UAL 
= 1 IRETURN 

2205 IF ECH£CCP)>0 THEN UAL=1 :RETURN 



2206 IF A0=Al-2 THEN GOTO 2210 

2207 FOR I=AI*1 TO A1+2:IF GRCI.BllO-1 
THEN UAL-1 

2208 NEKT I=IF UAL=1 THEN RETURN 
220B ROO=] :RETURN 

2210 FOR I=A1-1 TO Al-3 STEP -1 :IF GRCI, 
BlJO-1 THEN UAL-1 

2211 NEXT I:IF UAL=1 THEN RETURN 

2212 ROQ=l :RETURN 

2300 REM *** MOUUEMENT *** 

2301 POKE 53247*BG,8 

2302 A=Al:B=Bl:ON GCB1.BDH GOSUB 502,5 
01 

2303 A=A0 =8=88 :G0SU8 503 :PHCUJ-A0 :PUCU1 = 

Be 

2304 IF PRENPAJB THEN GOSUB 2468 

2385 IF FIX>8 THEN GOSUB 2500 

2386 IF COP-1 THEN GOSUB 2688;COP=8 

2307 IF ROQ=l THEN GOSUB 2780 

2308 IF FIX<=0 THEN FOR H=248 TO 140 STE 
P -5:S0UND 8,INTCH^l0Jt20,6,3:NEXT H :SOU 
ND 0.0,0,8 

2303 R=ABSCP-ll:GOSUB 1186:IFATT<1 THEN 

GOTO 700 
2316 ECHEC(R)=]:pOSITION 3,22:? " 
ECHEC AU ROI *E!" 

2311 FOR H>1 TO 80:SOUHD 0, 70+H, 10, 3 :NEX 
T HIFOR H=l TO 60:SOUND 0, 150-H,8,3:N£XT 

H:SOUND 0,0,0,8 

2312 nflT-HGOSUB 3188:IF HAT-0 THEN POSI 
TION 3,22:? " ": 
GOTO 700 

2313 POSITION 3,22=? " MAT I 
!!! M :FOR H=l TO 75:SOUND 0,70*INTC15 
tSINCH)),ia,3 

2314 SOUND 1, 120-INTC15*COSCHJ],10,2:NEX 
T H:SOUND 8,8,0,0:SOUND 1,0,0,0:GOTO 120 


2400 REH *:** PRISE EN PASSANT *** 

2401 IF P=0 THEN FIX=GRCA8,B0tl J :GRCA0,6 
8*1}=-1 :A=A0:B=80+1 :ON GCA0,B0+] J+l GOSU 
B 582,581 IRETURN 

2402 FIX=GRCA0,B8-n :GRCA0, B0-11 — 1 :A=A0 
■■8=B0-l:ON GrA0,B0-U*l GOSUB 502,501 :RE 
TURN 

2589 REn *»* CAPTURE «* 

,: 01 FOR H=240 TO 140 STEP -5iSOUNO 0.IN 
T £H'10) + 20, 12,1- :NEXT HiSOUNO 0,0,9,0 
T502 PHCFIX]=-1 :PUCFIXJ=-1 

2503 RESTORE 2518+FIX iREAD 0,A,B:CAPCO> 
CAPCOIH :B=8-CAPCO) 

2504 WY=0:U=FIX:GOSI«3 584 :W-W0 :QICO, CAPC 
Oll-FIX iRETURN 

2511 DATA 8,12,3 

2512 OATA 8,12,3 

2513 DATA 0,12,3 

2514 DATA 0,12,3 

2515 DATA 0,12,3 

2516 OATA 8,12,3 

2517 DATA 0,12,3 

2518 DATA 0,12,3 
251B DATA 1,11,9 

2520 DATA 1,11,3 

2521 DATA 2,11,7 

2522 DATA 2,11,7 

2523 DATA 3,11,5 

2524 DATA 3,11,5 

2525 DATA 4,11,3 

2526 DATA 5,11,2 

2527 OATA 6,-3,9 

2528 OATA 6,-3,3 
2523 OATA 6,-3,3 

2530 DATA 6,-3,3 

2531 DATA 6,-3,9 

2532 DATA 6,-3,3 

2533 DATA 6,-3,6 

2534 DATA 6,-3,9 

2535 DATA 7i-4,9 

2536 DATA 7,-4,9 

2537 DATA B,-4,7 
2536 DATA 6,-4,7 

2539 DATA 9,-4,5 

2540 OATA 9,-4,5 

2541 OATA 10,-4,3 

2542 DATA 11,-4,2 

2608 REn *** PROnOTION OU PION *** 

2601 K=6*P+1 :AG=11-15*P 

2602 IF CCAPCK3=0 AND CAP[Ktl)»0 AND CAP 
CK*2)-0 AND CAPtK»3)-0) THEN RETURN 

2603 POKE 77,0:IF K-6*P*5 THEN K-6«ptl 

2604 IF CAPtKl=8 THEN k=Kt]:GOTO 2603 

2605 CG»8 :8G=9-t2*[K-8*INTr.K<-6] D-l )-CCAP 
IKJ-I) -GOSUB 1680 

2606 IF STICKCPJ-14 THEN POKE 53217*BG,0 
:K-K»l iGOTO 2603 

2607 IF STRIG(P)=0 THEN FOR 1=0 TO 7iPOK 
E 53247+BG,0:GOTO 2609 

2688 GOTO 2606 

2689 A=ll-I5*PiB=18-2*tK-6«P]iG0SUB 582 
2618 FIX=I4:G0SU6 2502 

2611 U.QICK,CAP[K}]iA*A0:e*8e:GOSU8 503: 
GRCA0,80]=U:PH[bI]=A8:PUtUJ=BB 

2612 *CAPCKJ=CAP[K)-1 iRETURN 
2788 REn *** ROQUE <» 

2781 IF SGNCA0-A1K0 THEN GOTO 2704 
2702 U=GRC8,Bn:GRCAltl,Bl]=lJ:A=8:8=Bl:0 






N GC8,B1]»1 GOSUB 502,501 :GR(8,ai J = -l 

2703 PHtU]=Al + l :PUtiJ)=Bl :A=Altl :8=B1 iGOS 

UB 503 ■■UAL=0:U=U0 IRETURN 

2784 U=GR[1,B1J :GRCA1-1,B1)=U:A'1 :B=B1 :□ 

N GCl.BlH-l GOSUB 502, 501 :GR[ 1 ,Bi'J=—l 

2705 PHCU1=A1-1 :PUCU)=81 :A-=A1-1 :B=B1 :GOS 

UB 503--UAL=0:U=U0:RETURN 

2B00 REn *** DEnEURE EN ECHEC « 

2801 POSITION 3,22:? "CETTE nANOEUURE UO 

US LAISSE ECHEC !!" 

2B82 FOR 1=288 TO 180 STEP -3:SOUND ( 

TCI'5)t50,12,3:NEXT I 

2883 FOR 1=100 TO 208 STEP 3:S0UND 0.INT 

fI^53*58,12,3:NEXT HSOUND 8,8,0,0 

2804 POSITION 3,22:? " 

- : RETURN 
2300 REn *** ARRIUEE EN ECHEC *** 
2901 POSITION 3,22:? "CETTE nANOEUURE UO 
US nET ECHEC !!" 
2302 FOR 1=200 TO 100 STEP -3:S0UND 0,IN 
TCI'5H-58, 12,3:NEXT I 
2903 FOR 1=180 TO 200 STEP 3:SOUND 0.INT 
tI^5J*59,12,3:NEXT HSOUND 0,0,0,0 
2304 POSITION 3,22:? " 

■ :RETURN 

2905 PHCU)=A1-1 :PU[W]=B1 :A=A1-1 :B=B1 :GDS 
UB 583:UAL=0:U=U0:RETURN 

3100 REn *** TEST nAT *** 

3101 II=16+16*R 

3102 FOR CO=PH[II3-l TO PHCII1 + HFOR LI= 
PUCII1-1 TO PU[IIX-l:ARG=0:GG=R:GOSUB 33 
00 

3107 IF ARG-0 THEN nAT-0 :CO-PHCII)*l :LI- 

PUIIIIM 

310B NEXT LIINEXT CO:IF nAT=0 THEN RETUR 

3109 FOR TUA-0 TO NE-1 :CO=COCTUAD :LI=LIC 
TUA]:FOR II=1 + 16*R TO 8+16*R :OC=PHCIIl :I 
L=PUCII] HF 0C<1 THEN GOTO 3117 

3110 TT=l:IF CNTCIIK1 THEN TT-2 

3111 IF ABSCCO-OCJ>1 THEN GOTO 3117 

3112 IF R=0 AND CLDIL-1 OR LKIL-TTJ TH 
EN GOTO 311? 

3113 IF R=l AND CLKIL+1 OR LI>IL*TT] TH 
EN GOTO 3117 

3114 IF COOOC AND INTCGRCCO.LI V17JOAB 
SCR-1J THEN BAL-1 iGOSUB 3200:IF BALO0 T 
HEN GOTO 3117 
'3115 IF CO-OC AND-GRtCO,LIK>-l THEN GOT 

3117 

3116 ARG=0:GOSUB 330BUF ARG=8 THEN nAT= 
8:IF nAT-0 THEN II=8-H6*R 

3117 NEXT IHIF nAT=0 THEN TUA=NE:GOTO 3 
166 

3118 FOR II=9t]6*R TO IB-M6*R :OC=PHCIIl : 
IL-PUCII) :IF 0C<1 THEN GOTO 3127 

3113 IF GtCO,LIX>GCOC,ILl THEN GOTO 312 
7 

3120 IF ABSCCO-OCDOABSCLI-IL) THEN GOTO 
3127 

3121 Il=SGNCCO-OCJU=SGNCLI-IL] 

3122 IF A8SCCO-0CX2 THEN GOTO 3125 

3123 FOR K=I1 TO CO-OC-I1 STEP II HF GRC 
0Ci-K,IL+J*ABS[K])O-l THEN GOTO 3127 

3124 NEXT K 

3125 IF INTCGRCCO,LIX17)=R THEN GOTO 31 
2? 

3126 ARG=0:GOSU8 3388IIF ARG=0 THEN nAT= 
0:IF nAT=8 THEN II=18*16*R 

3127 NEXT II:IF nAT=0 THEN TUA=NE :GOTO 3 
168 

3128 FOR II=11+16*R TO 12tl6>R-DC=PHCIIl 
HL-PUCIIXIF 0C<1 THEN GOTO 3135 

3129 IF G[CO,LI>GCOC,IL) THEN GOTO 3135 

3130 IF ABSCCO-OCK1 OR ABS(CO-C 
N GOTO 3135 

3131 IF ABSCCO-OCJ=2 AND ABStLI-ILlOl T 
HEN GOTO 3135 

3132 IF A8SCC0-0C]=1 AND ABStLI-IL]<>2 T 
HEN GOTO 3135 

3133 IF INTCGRtCO,LI)vl?1-R THEN GOTO 31 
35 

3134 ARG=0:GOSUB 3300HF ARG=0 THEN HAT= 
0:IF nAT=0 THEN II=12-H6«R 

3135 NEXT II:IF nAT=0 THEN TUA=NE :GOTO 3 
168 

3136 FOR II=13H6*R TO 14+ 16*R iOC-PH[II) 
:IL-PUCIIHIF 0C<1 THEN GOTO 3L47 

3137 IF COOOC ANO LIOIL THEN GOTO 3147 

3138 I1=SGNCCO-OC1 U=SGNCLI-IL) 

3139 IF ABSCC0-0CX2 THEN GOTO 3142 

3140 FOR K=I1 TO CO-OC-I1 STEP II =IF GRC 
0C*K,ILK>-1 THEN K=100*I1 

3141 NEXT KHF ABSCK3>90 THEN GOTO 3147 

3142 IF A85CLI-ILX2 THEN GOTO 3145 

3143 FOR K=J TO LI-IL-J STEP J HF GRCOC, 
IL+KX>-1 THEN K=108*J 

3144 NEXT K:IF ABSCK)>98 THEN GOTO 3147 

3145 IF INTCGR[C0,LI)'171-R THEN GOTO 31 

3146 ARG-0:GOSUB 3300 : IF HRG-8 THEN IWT" 
0:IF PIAT=e THEN II=14 + 16*R 

3147 NEXT IIHF HAT=8 THEN TUA-NE IGOTO 3 
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COMMODORE 
64 



Si ('utilisation de la haute resolution vous pose des pro- 
blemes, voici enfin un programme qui va vous permet- 
tre de beneficier facilement des possibilites graphiques 
de votre Commodore. 

Pierre PAR RAT 

Mode d'emploi: 

Le programme esl presente en deux parlies. Le premier programme 
est un utilitaire en langage machine qui va creer de nouvelles ins- 
tructions. Le deuxieme programme esl une demonstration uTMisanl 
les nouvelles instructions. II contient son mode d'emploi el en REM 
les remarques qui permetten! de modifier le programme pour lappli- 
quer a d'autres objets. 



*INVTJ- 



...15 SECONDED " 




•8:9,8, 1 POINT" a 
M.R. POUR LE C.64 ■ 3 PAP p. PRPPRT - 
ECRAN.BORD.ENCRE (COULEURJ" 
EFFACE L'ECRBN ORflPMIOUE " 
1 MET EN ECRAN 0RRPH1QUE " 
' RETOUR A L'ECRAN TEXTE " 
X6.V0. 1 PUCE UN PIXEL " 
e.VB.0 EFFACE UN PIXEL " 
X0.V9.X1-V1-1 TRFCE UNE DROITE ■ 
73 PRINT"W«iD.>W,VB.Xl,¥l,a EFFACE UNE DROITE ' 
93 NEU 

83 DATR32, 99, 195, 224, 16. 16.26, 142,33, 288. 32,18!, 195, 224, 16. 16. 16. 142,32, 298 
96 DWm32, 162, 195.224.9, 16,6. 142,134.2.76,174,167.76,72, 178,32. 113.8,281,64 
93DHTA240, 6. 32, 121. 9, 76, 231. 167. 32, 113, 0,291. 69, 288. 3, 76. 227, 193, 291, 71, 208 

■■» DATR3,76. 1" "" "" " . -- .. .... 

» DATR3,76,S 

B WTR9.9.e _ 

5 BATHS*. 32,99, 193.224.1,298,52. 173,17.288.9,32,141, 17,298.1 



DATA24, 288, 173, 2, 221, 9, 3, 141,2,221,173,9,221,41.252,9.2,141,9,221, 
DflTA2e9,41,13,9,112,141,24,268, 169.124,141,136,2,76, 174,167,173, 17 



43 OTTA6, 143.251,136.206.231,230,232. 166.232.224,128,144,243.169,92. 133. Z32 
59 DATA169.B. 133, 231, 173,134,2, 19,16. 19.19.133.233.173,33,288.41,15,3,233.169 
33 DATA9, 143, 251, 136, 299, 231, 230, 252, 166,232.224,96,144,241.96. 1,32. 196.193 
69 DATA163.20, 133,253. 165,21,133,254,32,192, 193. 134,252.32. 162. 193.142.43,196 
63 DATR32.72, 196,76, 174, 167,163,252,74,74,74,133,251,165,233. 141,91,193,41,248 
78 DATR133, 253. 165, 252, 41, 7, 24, 191. 233, 133, 253, 163. 254, 163. 9, 133,234,169,8. 133 
73 DATR252. 163.231. 162.6.18.38,252.292,298.258.133,251. 141,92.193, 163,232,141 
89 DATR93, 195. 173,92,195.18.46.93.193.10.46,93.195.24,101,251.133,231.173.93 
83 DATR193, 101,252. 133.232,24,163.231.191,233, 133,231,163.232. 191.254.193.96 
98 DATR133,232.173,91,195.41.7, 133.233, 169.7,36.229.233.133.253, 173.43. 196,248 
95 DRTR17, 169, 1.166, 253, 248. 4, 18. 292. 298. 252. 168, 9, 17, 231. 143, 23!, 96, 169, 1.166 
<A8 0ATA233, 249. 4. 19. 292,298, 232. 166, 9, 73, 233. 49. 231, 145,231. 96. 9. 9. 9,9. 253.1 
293 WTA253, 1.253,255, 1,1,9,6,6,0,255.1,255.1.255.1.253, 1.253. 255. 1.1.233.235 



234,234,234,234.234.234.32.186,193.165.29.141. 



,197,163,21,141,8 



235 DRTA43, 196,173,11,197.36.237.7,197, 141,15,197,173,12.197.237,8,197,141 
249 DHTR197, 46.3.238. 6, 197,173,13, 197.36.237,9,197,141.17.197.173, 14.197,237 
243 DRTR10, 197,141,18, 197,48.6.238,6,197,238.6.197.173.16.197.172,13, 197,32,143 
256 DATA179, 32.88, 188, 162,8, 169, 197,32.212,197,173,19. 197,172.17.197,32.145, 179 



263 DRTR236, 196,1 



.254,196.189.244,196,141,253.196.173,232.196.291,1 



299 DATA291,0.29B,8, 169,9. 141,19. 197, 1*1,29, 1?7. 173,253, 196, 2 

285 DRTR15, 197, 141,21.197,173, 16,197,141,22.197,173,233,196.291,233,288,17,36 
296 WTflI69,8,237, 15, 197,141.21.197. 169.8.237.16.197,141,22, 197.173,233.196.291 
293 DfTme.2Be,9, 169,8, 141,21.197.141,22, 197. 173,19, 197.36.237.21.197, 141.23, 197 
399 DATR173.29, 197.237,22,197, 141,24,197, 173,254,196,281-1,299, 12, 173, 17, 197 
395 WTR141, 19,197.173,18. 197. 141.26. 197, 173,234, 196,291,253,288,17,36, 169.6 
310 DATR237. 17, 197, 141,19, 197,169.0.237.18,197. 141.29, 197. 173,254,196,291,9.288 
313 DfiTRS, 169, 9, 141, 19, 197, 141, 26, 197, 173, 255, 196. 291. 1.268, 12, 173. 1 3, 19?, 141 
329 WTR21,197,173,16,I97, 141,22,197, 173,255,196,291,255,298, 17,56.169,8.237 
325 DATA15, 197. 141, 21, 197. 169. 9, 237, 16. 197, 141, 22, 197,173.255,196,291,9,299,8 
339 DATA169.9. 141.21, 197, 141,22, 197. 173. 19. 197,36,237,21, 197,141,23, 197, 173,26 
335 DRTR197.237.22, 197, 141,26.197.173.7.197, 133,253. 173,8.197, 133.254,173,9, 197 
346 DHTR133.2S2.32. 72,196. 173,8.197,295.12,197,288.27.173,7, 197.285, 11.197,268 
345 DRTA19, 173. 16.197.295. 14,197.298,11.173,9,197,265.13. 197,206,3.76.174, 167 
356 DRTR173, 27, 197, 24, 199,23,197,141,29.197,173,28.197,199,24,197,141,39.197 
355 OTTR173, 27. 197. 24- 199, 25. 197, 141, 31, 197. 173, 28. 197, 169, 26. 197, 141, 32, 197 
369 WTR173. 38, 197, 172, 29, 197, 32, 145, 179, 32, 88. 198, 162. 0.169, 197. 32, 212, 1B7, 173 
365 WTR32, 197,172,31, 197, 32, 145,179,32,88,188, 169,9, 169,197,32,91.188,48, 111 
379 DHTR173.252, 196, 201,1,299.17,173.7, 197,24,195,1,141.7, 197, 173.8,197, 185,8 
373 DATR141.8,197, 173.232,196.291,233,208. 17, 173,7, 197,56,233,1,141,7, 197-173 
389 DATA8, 197,233,9,141,8, 197, 173,253, 196,261.1.288, 17.173.9, 197,24,183, 1.141 
363 DRTR9.197, 173, 19,197, 183,8, 141.10, 197, 173,233, 196,281,255,288, 17, 173,9, 197 
399 DATS56, 233. 1,141,9, 197-173,19. 197.233,9. 141.19, 197, 173,29,197, 141,27, 197 
393 DATA173, 30, 197, 141, 28, 197, 76. 247, 198, 173,254,196,201.1,208.17.173,7,197,24 
488 DRTR183, 1,141, 7. 197. 173, 8. 197. 193. 8. 141. 8, 197, 173. 254, 196. 201. 235, 208. 17 



3 08,6,14,1 
10 PRINT'S" 
20 PRINT'MBVM 

39 PRINT"»9« PROOPftWIE DE DEMONSTRATION • 

40 PRINT"I#W 
~ — " UTILISANT " 



S POSSIBLES " 



i F'Pinr-iiMia 

i PRINT'NIia LES DIVEPS t 
99 PRINT"«»W 
200 PRINT"WKI LES TRANSLATIONS " 
210 PRINT-M SUIVRNT L'RXE DCS X 
229 PRINT"* SUIVRNT L'RXE DES ¥ 
239 PRINT"* SUIVRNT L'.AXE DES Z 
249 PRINT"»»HS 

259 PRINT"*I> LES ROTATIONS " 
269 PRINT")* SUIVRNT L'AXE DES X 

279 PRINT"M SUIVRNT L'RXE DES V i 

280 PRINT"* SUIVRNT L'RXE DES Z ■ 
299 PRINT"»M3 ■ 
399 PRINTIM LES HOIWTHETIES " 



330 PRINT"! STOP SUR 9 P I 3RPPUYEZ UNE T0UCHE" 

340 OETA* IFfl*«""THEN346 

359 QC--1 

369 BE 8S.6.14.1 

379 RETl 21 EST LE NOMBRE DE POINTS 

389 DIflX<21),V<21).Z(21).XXC21),VV(21),Z2<21).MC21).N<21> 

398-REM 9 TO 29 IDEA 

499 FORR-9TO20REflDX(R),V<R>.Z<R> NEXTR 

410 REM EN DflTR CNROUE GROUPE DE 3 NOMBRES DEFINIT LES COORDONNEES X, 

420 DflTR-45.9,G. -20. -15 0,30,-5.6.45.-15.0.50.-15.0,45.0.0.-20.5.0.-; 

436 DRTR3,e,46.15,0.40,ie.e,5.35.O,2,4;.g.i;.5e.O 15 

449 DHTR58. 0.-15. 45. 0.-13, 33. 9. -2. 10. 9.-3. 13, 9, -49, 3, 9, -49. -23. 9. -10 

439 PX-9 : PV-9 : P2-0 ■RX-8:RV»B:RZ"8:H"1 

468 REM 6 EST LE NOMBRE DE DESSINS PRR DEMI TOUR 

478 K-6/ir 

499 REM 13 DEFINIT LE NOttBRE DE SINUS ET DE COSINUS PRR TOUR 

499 DIMC<13),S<13> 

389 REM 9 TO 12 IDEM 

SIB FORR-0TO12: S(R)-SIH<ft/K> [XRJ-COSWIO ^NEXTR 

528 rjOTOSW 

536 0ETfl*:IFR»."-THEN536 

S49 REM 10 EST LE NOMBRE DE POINTS POUR Lfl TRANSLATION 

339 IFAi«"Q"THENPX"PX*18 

368 IFA*«"U"THENPX-PX-1B 

570 IFA«."E"THENPY-PVtl6 

589 lFR«--R-THENPV=PV-ie 

399 IFA»-"T"THENFZ-PZ+18 

SB8 IFRf-"V"THENPZ-PZ-19 

516 IFR#""R H THENRX"RX+1 

629 IFn»-''"THENR»«X-l 

636 IFft*- 1 j-THERV-RY+I 

649 IFR*«".-"THEhRY«RV-l 



!-RZ*l 

666 1FR»-"H"THENRZ"RZ-1 
676 REM 6.2 EST LE RRPPORT D'HOMOTHETIE 
666 IFfl»--Z-THENH-H*6.2 
699 IFR»-'X _ THENH-H-e.2 
693 IFR»»"P"THEN1B7B 

789 REM 12 EST LE NOMBRE DE DESSINS PRR TOUR 
719 IFRX<8THENRX-RX*12 
726 IFRV<9THENRV«RV*12 
736 IFRZC6THENRZ4Z+12 
746 IFRX>35THENRX-RX-12 
756 1FRV>35THENRV-RV-I2 
769 IFRZ>33THENFZ"RZ-12 
776 IFPZ>329THENPZ"328 
799 IFH>2THENH*1 
799 IFH<:9.2THENH=1 

810 XX<R)-X<R)+PX 
320 YVCR)-V<RJtPV 
B39 ZZ<RJ-Z(R>*PZ 
349 Vl-WCR)«;eRX)-ZZ<R)*S(RX> 
850 ZZXR)»VV(RJ»S(RX)*ZZ(R»C<RX) 
868 X1»XX<R;>«XRV)-ZZ<R>»S<RV> 
979 ZZ(R)=XX<R)*S<RV)+ZZ(R>»CCRV) 
889 XX(R'>=X1*C(RZ)-V1«S(PZ> 
899 W<R)-XI»S(RZ)*V1«C<RZ) 
999 M<R)*XX<R)»H*169 
918 N<R>"W(R>*H+199 
929 NEXTR 



I't-i.il'P -.•:"}:. ! i: 



999 9D,H<12).NC12).M<13>.N<13).ri 



D,MC7)-N(7>.M<9).N(8>,1 



1929 W,r\'\T>.Wl? 



>,rt<15).N(15).l 

..16).ri(17).N(17)-l 

K18>.I1(19J.N<19).I 




HAUTE RESOLUTION 



II-15tl6*R:0C-PH[II):IL-PUCIIJ:IF D 

THEN GOTO 31BB 
IF COOOC RND LIOIL THEN GOTO 3160 
I1-SGN[C0-0CJ:J-SGNCH-IL3 
IF R8SCC0-0CK2 THEN GOTO 315* 
FOR K=I1 TO CO-OC-I1 STEP II :IF GR1 

,ILJO-l THEN K=1001I1 
NEXT KHF RBStK)>3B THEN GOTO 3168 
IF RBSCLI-ILJO THEN GOTO 3157 
FOR K=J TO LI-IL-J STEP J:IF GR(OC 



ARG=a:GOSUB 3380;IF RRG-0 THEN ««T- 
IF MRT'B THEN TUA'NE:GOT0 3108 
IF GtCO.LI) OOt OC, IL) THEN GOTO 318f 
IF ABSrCO-OCK>ABSCLI-IL] THEN GOTC 



1(20J.N<20>,1 aD,M'.20).N<20).r1C0>,N(9),l 
3 i?D M'0,.H'cii.M'-7>.H'7).l:9D.M<7).hK7).M(l).N<l).l 
3 aD.f1Cl>.N<l>,M<20).N<28),l 
3 G0TO338. 
3 9G.8 END 



3198 

3162 Il=SGN[CO-OC):J=SGNCLI-IL) 

3163 IF HBSCCQ-OCX2 THEN GOTO 3100 

3164 FOR K-U TO C0-0C-I1 STEP II ;IF GR[ 
0C*K,ILtJ*flBS[KJ)O-l THEN K*100«I1 
31Q5 NEXT K;IF ABS(K)>96 THEN GOTO 31B8 

3166 IF INTtGRCC0,LIJ--17]-R THEN GOTO 31 
B8 

3167 RRG=B:GOSUB 3300:IF ORG=0 THEN MAT' 
9:IF nOT=0 THEN TUA-NE 

3168 NEXT TUA.rRETURN 

3200 REM *»» TEST PRISE EN PA »* 
3281 IF C0UP<2 THEN RETURN 

3202 IF R-0 THEN MNEF-C0'7:nG£L-IL :GOTO 
3204 

3203 MNEP=CO-l:MGEL=IL 

3704 IF PEPlrTNEFl=COUP-l AND tEPtMNEF3=n 
GEL THEN BAL=0 
3285 RETURN 



3380 REM *** POSITION EUENTUELLE «** 

3301 ?H=PHtII]:Zu-PgCII) 

3302 IF CCQ<1 OR C018J OR CLIO OR LI>B3 
THEN BRG=i:RETURN 

3303 IF INUGR(C0,LIV17)«GG THEN ARG 
RETURN 

3304 ATT=0:PHCIIJ=CO:PU<Ii:=LI:FIX-GR(CG 
.LIJ:GRt?H,?U3=-l iGRCCO,Ll)=I--IF FIX>0 T 
HEN PU(FIXJ=-1 rPUCFIX] — 1 

3305 GDSUB 11B9:IF ATT=I THEN ARG-1 
330B GR[CO,LI)-FIX:GRCZH, ZUJ-II :PHCII3-? 
H!PU1II]=2U:IF FIX>8 THEN PH1FIXJ-C0: 
FIXJ-LI 
3307 RETURN 
4090 IF NHO0 THEN NE'ABStNH] :F0R U-0 TO 

NE-1 :C01U)-PHCI)-U*J :LIIU)=PUtI) :NEXT L 
(RETURN 

4001 NE*ABSCNUl:FOR u=0 TO NE-I :CQ[UJ=PH 
fIl:LICUJ»PUCI)-U»j:NEXT U:RETURN f> 



edito 




L'interview que nous a accordee 
le senateur Rausch a fait coulee 
beaucoup d'encre ; "le bide in- 
formalique franijais", pensez 
done ! Nous avons ete accuses, 
bien evidemment, de pessi- 
misme, de parti pris el de mau- 
vaise fot. Beaucoup ne sonl pas 
encore habitues a lire des veri- 
tes. Pour eux tout va bien, per- 
Sonne ne tail d'erreur et surtoul 
pas les frangals ! Mais ouvrez 
les yeux. regardez autour de 
vous I Vous Irouvez normal, 
vous, que tous les deux jours 
les (abri cants annoncent soil un 
nouveau module, soit I'arret du 
meme nouveau modele. Rien ne 
vous cheque quand des geants 
comme CBS ou Texas se reti- 
rent du marche de f'informatique 
familiale? Et aujourd'hui, I'arret 
de NBM PC Junior, e'est de 
lelucubration de journaleux en 
mai de sensation peut-etre ? Et 
la fermeture des qu aires usines 
d'Apple, e'est du prpeau ? 
Mais, disent certains autres, le 
marche professionnel se porte 
bien, surtout le marche francais 
qui exporte a tout va. Mon oeil. 
les rares ordinateurs francais qui 
s'ex portent, vont generatement 
en Afrique et sont payes en noix 
de cajou ou viennent plus s im- 
plement grossir les dettes de 
ces pays envers la France. Re- 
gardez les Minitels dont parlait 
le Senateur en question, le Mi- 
nistre Mexandeau vient d'annon- 
cer, tout tier, que nous en 
avions exports 50.000, oul, oui, 
50.000 ! Meme pas le chitfre 
d'affaires mensuel d'une minus- 
cule societe ! Et JJSS qui vient 
de demissionner du Centre 
mondial de I'informatique, il Ira- 
vail I e pours ant pas pour 
I'Hebdo ? Et le licenciemen! de 
700 mecs chez Thomson, e'est 
pour nous faire plaisir qu'on les 
rout a la porte ? 

II faut se rendre a I'evidence, le 
senateur Rausch a raison, il est 
beaucoup trop tard : la mfcro-ln- 
formatique ne sera pas plus 
francaise que ne le sont les ma- 
gnetoscopes, les montres ou les 
appareils photos. Mais, nous, on 
sen tout, on peut tres bien vivre 
ivec un magnetoscope JVC, 
une montre Seiko et un Nikon et 
rlen ne nous empeche de pro- 
grammer sur un ordinateur ame- 
ncam. japonats ou anglais. Les 
autres pays nous achetenl en 
contre-partie ' nos styiistes de 
mode, nos parfums, nos grands 
vins et notre grande bouffe na- 
tionals. C'est deja pas si mal. 
contentons-nous de 9a ou chan- 
geons de politique en aidant les 
createurs de logiciels au lieu de 
distribuer des grosses subven- 
tions aux societes national isees. 
Ca, ce serait une bonne idee : 
des subventions pour les pro- 
grammeurs isoles qui ont des 
idees geniales mais pas de 
moyens pour les developper. 
Tiens, je cree un nouveau parti 
politique, tout de suite : le RPP, 
Rassemblemen! Pour la Pro- 
grammation ou non, mieux que 
ca : le PC, pas le Parti Commu- 
niste ni le Personnel Computer 
mais le Parti des Concepteurs I 
C'est moi que je serais le chef 
et vous, vous acheteriez tres 
cher la carte du parti et je me 
mettrais une grande partie des 
sous dans la poche et avec le 
peu qui resterait. j'organi serais 
des colioques. des forums, des 
expositions, des reunions et des 
debals pour discuter sur des 
projets qui ne verraient jamais le 
Jour. 

C'est pas un bon programme, 
ca ? Syntax error I 

Gerard CECCALDI 



CUI CUI ET 
"RO MINET 



TI99 BASIC SIMPLE 



55 



Pour un 'rot minet gourmand, un trtl dodu est un mets 
raffine. MtAM ! Ceta merite un petit effort. 



Denis PORTMAN 



100 REM >»•••*■•■.»- 

110 REM » CUI-CUI » 
120 REM * ET GROS MINOU • 

140 REM 

150 REM TI-99/4A 

160 REM basic simple 

170 REM 

ISO REM FORTMANN DENI5 

190 REM 

200 REM HtttHMMfMMH 

210 REM 

220 REM PREMIERE PARTIE 

230 REM 

240 REM orestnti'.mn du jsu 

230 CALL CLEAR 

260 CALL SCREEN 12) 

270 FOR Q-2 TO 9 

280 CALL C0LOR(G,2,2> 

290 NEXT G 

30O PRINT TABI3) I "•••••>•«•<• 



1, 294*2, 2, 294*' 



310 PRINT TAB13)!"* CUI-CUI ET GROS Ml 

330 PRINT "- VOUS ETES BROS MINOU ET 
VOUS VOULEZ ATTRAPPER CUI-CUI ■ 

340 PRINT "- MAIS AUANT CELA.MONTEZ 
ET OUVREZ LA CAGE AUX OISEAUX": 

350 PRINT "- ATTENTION. EVITEZ LE 
CHIEN":i 



790 NEXT r 
BOO BOTG ] 
BIO REM 
B20 REM 
830 REM 
B40 REM 
B50 CALL £ 



870 CALL SGUNDI- 



920 RETURN 

930 REM 

940 REM 

950 REM dauxj 

960 REM 

970 CALL SOUND t' 

9 BO RETURN 



010 CALL S0UNDI200, 196,2,392,2,7B4»2.2> 

020 RETURN 

030 CALL 50UNDI4O0, 165,2,330,2,659*2.2) 

040 RETURN 

050 CALL S0UNDI400, 194,2.392,2,784*2,2) 

O60 RETURN 

2,880*2,2) 




SAO 


GOSUB 910 


1070 


CALL S0UND(400,220,2,44O,2,£ 




PRINT "- SERVEZ VOUS DE LA MANETTE 


10B0 


RETURN 


NUMEROi 2 POUR VOUS DEPLACER"n 




REM 






1100 


REM DEUXIEME PARTIE 


ISO 


PRINT " POUR JOUER TAPE! UNE TOUCHE" 








FOR B-2 TO B 


1120 


REM 


400 


CALL C0L0R(G,11,2> 




CALL KEY<0,K,5T) 


410 


NEXT B 


1140 


IF ST-0 THEN 1130 


420 


REM 


1150 


CALL CLEAR 




QDSUB B70 




CALL S0UND(4230, 165,2, 196,2 


440 


REM definition 


1170 


A«="UN PEU DE PATIENCE" 




HBO 


LI-12 






1190 


co=a 


430 


CALL CHAR<92, "033FFF3F0F03") 


1200 


GOSUB 4380 


4&0 


CALL CHAR193. "COFCFFFCFOC") 




CALL C0L0R<8,2,2) 




CALL CHAR194,"FFFFFFFFFFFF") 


1220 


FOR G-9 TO 14 


4 BO 


CALL CHAR<96, "7030FC7E7F7F3F1C") 


1230 


CALL C0L0R(G,2,2) 




CALL CHARC97, " 000000 OOOBOEO 00 " ) 


1240 


NEXT G 




CALL CHARI9B, " 0EOA3F7EFEFEFC3B" ) 


1250 


REM 


510 


CALL CHAR (99, "0000000000010700" 1 


1260 


REM DEUXIEME PARTIE 


920 


CALL CHAR(91."1B1B") 


1270 


REM positionnoment 


540 


CALL CHAR( 100, "FF8D3CFFFFFFFFFF") 
60 SUB B90 


1290 


REM des car.cter.s 




CALL CHAR (144, "FFFF99FFFFFFC3C3" ) 


1300 


A— 3 


360 


CALL CHAR(145,"E7C3B1*) 


1310 


C=14 


370 


CALL CHAR<146, "0000000081 C3FFFF") 


1320 


R"2 


3S0 


CALL CHARM 52, "O0O1O3O2O2020202") 


1330 


FOR L-B TO 20 STEP 6 




CALL CHAR (153. "0202020001030707") 


1340 






CALL CHAR(134,"070707070767773F M ) 




C-C+A 


610 


GOSUB B50 


1360 


CALL HCHAR(L,C.92> 


420 


CALL CHAR(155,"3F1F1FOF07070E1E") 


1370 


CALL HCHAR(L.C+1,94,R> 


430 


CALL CHARU56."0080C0404Q404040") 


13B0 


CALL HCHAR(L,C+R+l,93) 




CALL CHAR! 157, "40404000BOCOEOEO" ) 




NEXT L 


650 


CALL CHARM5B. ■EOEOEOEOEOEAEEFC") 


1400 


IF C=24 THEN 1440 




CALL CHAR ( 159. "FCFBF8FOE0E0707B"! 


1410 












680 


IF E-0 THEN 710 


1430 


GOTO 1320 


690 


N-E/B 




C=18 




ON N GOSUB 350. B90. 910.870 


1450 




710 


CALL CHAR C104+E, "0000020907010300") 


1460 


FOR L=5 TO 23 STEP 6 


720 


CALL CHARI 105+-E, " 183CDBFFFFFFFFFF" ) 


1470 


C-C-l 


730 


CALL CHARM06+-E, "00004090EOBOCOOO") 




R=R*2 




CALL CHAR(107J-E,"1B1B3C3C3C7E7E7E" ) 




CALL HCHAR(L,C.92> 


730 


CALL CHARI10B+E, "FFFFFFFFfFFFfFFF") 




CALL HCHAfi(L,C-+l,94.R> 


760 


CALL CHARII09+.E."001E3F3303030303") 






CALL CHAR ( 1 10*E, " 191 D1F1F0F0FO7O1") 


1310 


CALL HCHAR(L,C*R+1,93) 


7 BO 


CALL CHARI 1 1 1*E, "9BBBFBFBF3F7FFFE" 1 


1520 


NEXT L 



1330 


CALL HCHAR(12,7,32,20! 




FOR 0"2 TO 8 


1550 


CALL COLORIG, 13,2) 


1560 


NEXT G 


1570 




1590 


LI -24 




CO-3 


1600 


BOSUB 4380 


1610 


SCORE— 100 




A»- "RECORD i " 


J 630 


LI -24 




CO-21 


1690 


BOSUB 4380 


1640 


A»«STR» (RECORD) 




LI -24 


16B0 


C0-2B 


1690 


GOSUB 4 3 BO 


1700 




1710 


LA-L 


1720 




1730 


CA-C 


1740 




1750 


PO-2 


1760 


LL— 2 


1770 


POSIT-1 


1780 


E-5 


1790 


CC-1B 


1BO0 


GOSUB 1980 


1810 


GOSUB 2610 


1820 


GOSUB 2460 


1B30 


CALL COL0«U*,2,2) 




CALL C0L0RM5,2,2) 


1890 


CALL C0L0R(9,2,2) 


1860 


CALL SOUNDUOO, 179,3, 32C 


1B70 


CALL SOUND(200, 110,0,-4 


1BB0 


CALL VCHARiLL.CC, 32,41 


1890 


CALL VCHAR(LL,CC+1,32,4) 


1900 


CALL VCHAft(LL,CC*2,32.4) 




IF LL<>19 THEN 1990 


1920 


LL— 2 


1930 


E-5 


1940 


PDBIT-I 


1990 


BOSUB 1980 




GOTO 1B20 


2000 


LL-LL*3 


2010 


IF LL-7 THEN 2030 


2020 


IF LL-13 THEN 2050 ELSE 


20-0 


E-7 


2040 


GOTO 2060 


2090 


E=9 


2060 


IF POSIT-2 THEN 2100 


2070 


CC-1B 


2080 


POSIT =2 


2090 


GOTO 2170 










2 £20 


DE-CC-E 


2130 


POSIT- 1 


2140 


GOTO 21 70 


2150 




2160 


POSIT" 3 


2170 


REM 


2180 


REM s/programmo 


2190 


REM depl acemvnt qhien 


2200 


REM 


221 


CALL GCHAR<LL,CC,X) 


2220 


IF X=32 THEN 2230 


2230 


CALL COLOR(10,2,2) 


2240 


CALL VCHARILL,CC»2,32,4 


2250 


LIG-LL 




FOR CAR-152 TO 155 


2270 


CALL UCHARtLIG.CC, CAR) 


2280 


LIG=LIG+1 


2290 




2300 


CALL VCHAR(LL,CC+1, 144) 


2310 


CALL VCHAR(LL+1,CC+1,10C 


2320 


CALL VCHAR1LL+2.CC*!, 14E 


2330 


CALL VCHAR{LL+-3.CC+1 , lli 


2340 


LIG-LL 




24B0 
2490 
2500 
2310 
25 20 
2530 

2550 

2370 
2580 



FOR J-l TO 10 
CALL J0VST(2,X,Y) 
IF XOO THEN 29K 



C-C-CD 

BOTO 2610 

IF PO-3 THEN 2950 



CALL COLOR(10,2,2) 
CALL SQUND(200,932,2.349,2) 
CALL 5QUNDM0O, 1397,0,680,0 
CALL VCHAR<LA,CA-1,32,4> 
CALL VCHAR(LA,CA,32,4) 
CALL VCHAR1LA,CA+1.32,4> 

3F XX<>32 THEN 44"" 
CALL HCHAR[L,C-1,I04> 
CALL HCHARIL.C, 105) 
CALL HCHAR(L,C»1, 106) 
CALL HCHAR(L+1,C,1D7J 
CALL VCHARIL+2.C, 108,2) 
CALL HCHAR!L»2,C+1,109) 
CALL HCHARIL+3,C-I;110t 
CALL HCHARfL+3,C+i,l-ll> 
CALL C0L0R(lO.5,2) 
IF L=13 THEN 2S60 
IF L=7 THEN 2B40 
GOTO 2B70 



2890 SCORE=SCORE-*K 



2630 
2640 
2630 
2660 
2670 



2720 
2730 

2740 
2750 
2760 
2770 
27B0 

2800 



2930 


GOSUB 4380 


2940 




THEN 3010 


2990 


RETURN 




2960 


REM 




2970 


REM 




2980 




fin 


2990 










3010 






3020 


GOSUB 




3030 


S08UB 






GDSUB 


010 




GOSUB 


010 


3060 








BOSUB 


050 




GDSUB 


070 


3090 


GOSUB 


050 


3100 


REM 






REM 


ROISIEME PARTIE 


3120 


REM 


Suite page 7 



DRAXON 



Piloter un vaisseau dans un tunnel, ce n'est pas tres 
naturel, mais le manque d'espace n'enleve rien a votre 
bravoure. 



SPECTRUM 



73 data bin aaeiiui 

74 OSTA BIN aaii.fli.li 

73 DATA BIN 3118388* 

?6 data bin iie&aee>2 
77 data bin laeeeaaa 



iSJSiti 



• aee 



i,aa 



■ INKEY«.b« THEN LET x.x+1 
v".en = ii THEN LET MX-1 
ATTR l»,13).a OR RTTR IX 

X .13! -131 THEN BEE 



♦ 18: LET i 



' -C, MAURY AND C. RIGHT 
" . PAUSE 188 PRINT F 

.ae' paint at ii,i3, - 

,. S3, "DRRXON" 

■ at s,a, " _princires 

OQuS DEUEZ A 

A SORRIER •"-.- 

TIOUE. OUI PROTEEE UN PULSRA.UOT 



. W i 



3.5 : Si? : i**" iSS ; TlAji*^ 



33 DATA BIN 1111188* 



35 DATA BIN 



"ilea DATA BI) 



i bin aeeeeeaa 

i bin ineeaoa 
i bin aimaea 

i bin eaiiiiii 
) bin aaiiaaii 
; bin emeaii 

S BIN 11111111 
r -B TO 7: RIAD b 



WM 



gp 



n:it:rt:&:it,i:i7t: 



IN 111111** 

in maaiia 

in eeaeean 

in aeaeoaai 
a TO 7 read t 

data bin eeeaeaaa 

■ --- tin aea 

un aeBeaea 

i 1 data bin isiaaeaa 



POKE I 



Si OATB BIN 8 

63 DATA BIN 8 



61 DATA BIN 1 



i data bin aai: 



, .4 ,.5.- - = 

i to sa 



18B 'DA i;» T( 

'"iaa'iF'RND.a.i. 

1B3 IF RND<8.l! 

ONDie.e. 

10(8.3! 



THEN CO TO 93 



.-J LET -J.U3R i33*0 

aos If i;.iaa*a oS f:.iaeea or 
tc-5aa*8 or s.:-i*a*a4 then beep 

8.3,3^ LET g-M-1 

699 LET mi-E*»8.8B IF imi-sa T 
HEN 00 TO SBSB 

988 SO TO S9 
1888 PRINT AT K.ll," "1 OYER 1: 

Ink 6, AT n-1.11," 

HINT RT v, 11, ■£.■- 



51 80 L.ES SHRSSelMS ^; 



S BARR-IERE. " PAU5 



3887 PAUSE iaa 
TAPEZ. 1 ■■■£'-' sf- 



1 PRINT I 



.il^ 



OVER 



TIJue CO.^POEMANT 



' 15,8, POUR Out OOT 



'EnEnT lE PLUS SDCHIS 



1889 r 



nze. 



3889 PRINT I 



'Ruse ( 



as,: 



■'TAPEZ -'"ENT 



late 

ES?S, 

PRINT DEB 



UCLEAIRES 



,1 .6 THEN GO 1 



INT INK 2, 



Mm 



SB MISSILES TF 

aa jaisseaux : 

IONS RELAI5 'Pf 

b. w-t LEB DIEUX SOIEh 
i. RAUBE i88. GO BUt 
SUB 9S5B 

AT l5,i. MLES STATION 
HINT '■ReflPRGVISIONNEr 

EN nlSSILESI ■■: PAUSE 



lie.BB THEN PRINT 

i PRINT 

+ 1,31, INK 1,"^' so to lie 

lis If HND(.81 THEN PRINT I 

' RNO'. .el THEN' PRINT I 

" t .!: i T B 5 h, TMtN "" 



EK 83677, 117a- 
YER S PAINT i 
1888 

aeie point at 
use if atta 



TAPE2 ■ ■ENTeR"- 



.) -2 OR ATTR 
I.4+11 .6 THEN 

. RETURN 



IS 18 GO BUB 9 



INE STATION RELAIS CLIO 



NOTRNTE DANS UN DERNIER SURSAUT 
OESPOIR SA uENSEANCE 5ERAIT J— 



i BEEP 50NQRE OOOS 



las' IF INK&VMCl 



'ao sub ae 



TRANSMUSIC 



^sasssT HECTOR' 



A quoi bon I'achat d'instruments 
Puisqu'un clavier d'ordinateur 
Fera de vous facilement 
Un musicien compositeur 

Patrick OLIVIER. / '?) „_ V| 

Mode d'emploi : ""£.;- ^\ %\\ 

Les "' " du listing doivent etre tapes "# ". Pour le reste. tout est ■^•j jB'-- \-JW 

dans le programme. fe^^M^S''" \v 

...SbtS \ 

i "copyright. Patriclc OLIVIER . Prograeee TRANS II 7B tonelSB.C IO> :nturn 

USIC sur HECTOR 2HR+ basic 3 79 detal3, 16, 1 ,0, 1 .0, 1,0. 1 ,0, 1 .0. 1.0, 1 , 0, 1,0,61 ,0, b 

2 -SURTOUT NE PAS FAIRE OE RENUM 7 , 129 ,0, 129, 0, 129, O, 67,0,61 , O, 1 ,0, 1 ,0, 1 ,0, t ,0, 1 ,0, 

™^'^"^';ir tl i fl " h0 ' PtDt71 ' lS0 * 97 ' 50 ' 2,OUtpilt " Pft 1.0.1,0, 1,0.61,0, 127, 0,233, 0,233.0,25=, 0,127, 0,61,0, 

TRICK OLIVIER", 73, 142, 3loutput "FRESENTE" , 96, 116,3 0.0.0.0.0,0,0, 0, 0,0, O.O. 0, O, 60, 0, 66, 0. 129.0. 129,0 12 

11 dat»3, 4, 5, BO, 300, 7, 2,0, 83, 300, 4, 1,3, 97, 300,1.0,6 9 n 129 66 O 60 

,B5, 300, 2, 3,1, BO, 300, 6, 4, 7, 131, 130, 4, 5, 2, 124, 150,3,7 Bo'datao! 96! qIbO, 0,72,0,70,0,70,0,32,0,32,0, 16,0, 16 

,4,110,600 ,0,B,0,B, 0,4, 0.4, 0,2, 0,2, 0,2, 0,6,0, 10,0,118,0,106,0, 

12 forI=ltoB:readA,F,C, D.EicolorA, i ,F,Ci tonaD.Emex IB, 0, 100.0, 100,0, B, O, B, 0, 16, 0, 16,0,32,0,32,0,32,0,0, 
tipause2iHipeibrightliscreen8.230,230,230n:ls2icolor 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,235,0,235,0,25 
0,l,7,3iA»="T AS MS C"iBB-" R N 3,0,233,0,233,0 

U I ,, iC-120-3«lBn(A»)ip«nl:cur»arC 1 113iprlntA» B1 dataO, 0,4,0, 12,0, 1 16,0, 100,0,4,0, 4, 0,8,0, 8, 0, 16, 

p.n3:cursorC,115iprintB« 0,16,0,32,0,32,0,64,0,64,0 

13 A=liB=3iforF<»lta40iswapA,BipenAicurB[]rC,114:prin B2 dataO, 12, 0, 12, 0, 10,0,10,0,9,0,9,0,6,1,232,3,248, 
tAt:penBicurBarC,115iprintB»isaund3,264inBiitiBQUnd7, 7,248,7,248.7,248,7,248,3,248,1,232,0, 12,0,12,0, 10,0 
66:pen2igoto79 iO, 0,9,0. 9, O, 12, O, 12, 1,234,3, 250, 7, 249.7.249 7 248 

14 onA(0)gosublB, 20, 22,24. 26, 28,30,26,32, 34, 36, 56, 5 3,24b!i!232 ,«',o,™,/,^, ; ,^ T ,/,^h, 
8, 60, 22, 62, 64, 66, 66, 69, 71, 75, 77i return 83 r».tor»71i<nripA4fmfthnij?7i . r ..rfu,n n i,.i u.__» 

1= output TORRE O'ESpJcEnENf POgB CWTIHUSB-,20,13, „kL=FE3 o'SS« £2 ' 

1 !J*r! o *™*iii'^ A T2M h %°°w'^;i':' : ;":" i "' n » e»»»SMuci3iM,iia*ii»noM^«i3»»^««« 

16 1 ine30, 220, 30, 140, 3: f orF=pi < -50) to0step6: X-6*cd» > 1 mi 

pi (-62)st>p-6:]('-6'i-t2*coB<F/50) ■ Y*=12tsin CF/50 iplotX , n , M . h7a«_i „.!■.-■ i n., (stv"n".^ntvn- tl ,»„n.rK..i 

«o,v.,7o, 3 ,„.»„ 1 ,„.,«o, Y .,7o.3 i ..,o, 3 „i™ 3t p J2 o, ::;^,:?::;E:r a ^^r ° """ - """»«° b5 "' 

17 forF-pi(-30>to0Btep6:X=3*co«(F/30)iY-3*ein<-F/50 |* R-O^G-O 
>iplotX+33,Y+220,3mextiforF=0topi <-62) step-6j X-6*to ~ . 
s(F/30)iY-6»sin(F/50>iplotX*24,Y*140,3inextiY-0iretu B9 col orO 1 2 3 

IB tonel31,C(0) igosubl06:output"MI",R,H,2ioutputYS< 91 ^J" 

D),G,171+H, 2: return 92 q»o+1 I if 0-4OOth»nA(O) =-56i gotol31 i elaeA»-in«tr» ( 

19 tonel31,C(0>ireturn t ) i A(0) MK <A«>-99 

20 tonel39, C (Oil gosub 106i output "R££",R, H, 2i outputY* 93 If A (01— 56then0-0-l : T=0: goto 131 

(0>+"£",G, 165+H, 2: return 04 if A (0>— 91thenO-D-2: plotR, W+B3, 30, 95, Oi f orF-W+70 

21 tonel39,C(0>t return taW+30step-10i 1 ineR,F,R+30,F, 1 inextigoto92 

22 tonel24 l C(0):gosubl06i output "FA" ,R,W,2i outputY»( 95 if A (OK lorA 10) >23thBnO=D-li A(0) =0i gata92 
0), 6, 176+H,2t return 96 if A(O) -19thenA(0>-0i 0-0-1 igoto92 

23 tonel24,C(D>ireturn 97 c«tO)-lnmtr» (1) 

24 tonellO,C(0)igoBUbl06i output" SOL", R,N,2i outputY* 98 If C»(0) X"b"andC*lO) X"c"andC*(0> >< "n u andC* (O) X 
(OJ ,G, :81+H, 2: return "r "andC* (0) <>"d"«ndC* (O) X". "thengoto97 

25 tonellO.CCO>ire.turn 99 if C* CO) X". "ttYBngotol03 

26 tone97,CCO) igosubl06i output "LA", R,M,2ioutputY* (O 100 P*-instr*( 1 ) 

>,G,IB6+H,2i return lOl lfP»X"b"andP»X"e M andP*X"n"andP*X"r"andP*<>" 

27 tof>e97, C(0) 1 return d"thengotolOO 

28 toneSO.C(O) 1 gosubl06i output "DO", R,W,2i output Y»(0 102 C* (0) "P*+C*(0) 
>,G,196*H,2ireturn 10 3 goaubl47 

29 toneBO,C(0>ireturn 104 goaub 14 

30 tonoB5,C(0):go*ubl06ioutput"SI",R,W,2loutputY*(0 105 goto92 
»,G,191+H,2ir»turn J06 y_ v+1 

31 toneB3,C(0>ireturn , 07 if y-7thengntol 1 

32 ton«71,C(0)igoaubl06ioutput-RE B ,R,l>l,2ioutputY*(0 ice G-G+30 
>,G,201-*H.2ireturn J09 R _ R+30 

33 ton»71,C(0),r«turn H gotol i 4 

34 tonB63,C(0)tgoBUbl06ioutpuf MI",R,U,2iDutputV*(0 m S-0*1 

"sS'ESsJKSE^urn ;;i r, - S;|S^:s;™ ,M " H -" > °"'- 

36 ifC»(0>-"d"thenpauBB.0Sigosubl06iE)utputchr*U96> 114 r _t urn 
.G,1B9+H,2ireturn ,, 5 mi 

37 ifC«C0)-"a"thenp*UBB.073igoaiibl06ioutputchr*(196 U6 M-130iR-20iG-20. H-Oi Y-0. O-Oi Y-0 
>♦-.". G,1B9+H,2ireturn ,17 +O rF-200tol60.t-p-10 

30 ifC*{a)-"e"th»np»use.ligo*ubi06joutputchr»(198>, ne lineO F 241 F 1 

G,189*H,2i return „, i ln «0,F- 100^241 .F-100, 1 inwt 

39 lfC*C0)="v"thenpause.2igosubl06ioutputchr*(198>+ 120 T-T+l 
",".G,1B9 + H, 2, return l21 If T -lth.ngoBUbl6 

40 ifC»(0>«"n"th»np*uB».2igoBubl06ioutputchr»<193), 122 raturn 
E, 189+H,2tr«turn l23 0-0 

41 ifC«(D)="*"th«npauBe.3igoaubl06ioutputchrB(193)+ 124 gasubllS 
".",G,lB9 + H,2,r-t U rn 123 D _ D *1 

42 lfC»(0> = ,, b"thenpauBB.4igosubl06ioutputchr»(197>, 126 if A(0>"'S6thBnaotDl29 
G,lB4*H.2 S r«tur n , 27 otJ]luh i 4 

43 if C«(0)="x"thanpau«e.6igoaubl06ioutputchr»(197>* 12a gotol23 

''Jl'fiiSVH'Vl,Tt Urn r. 129 l*P-lth»nO-0-liP-0:colorO,l,2,3igoBub92 

44 ifC»(0)="r"thanpauBB.6igoaubl06ioutputchr»(197), 130 p au«al.3 

6, 1B9+H,2i rtturn 1 31 p»0i t*ip«icolorO, i ,7,3:bright 1 1 cur«or60,230ip«nl 

45 1 f C«(0)-"w"thanp»uaBl.2igoaub 106i outputchr»( 197) iprlnfOUE CHOISISSEZ-VOUS?" ip«n2i cursor 43, 2201 print 
*'.'. "^ii^T H f.?. , .r? tUrn -_ u - >1 ErfTENDRE L'AIR PROGRAMME AVEC VISUALISATION 

46 ifC»(0)=i"d"thBnp«uBB.03ireturn E LA MUSIQUE" 

In ;*"j°'"" a " tn " n P" uo "' 075 "" eturn 132 cur«or43,190iprint"->2 ENTENDRE L'AIR PROGRAMME 

2d fl^IJn = thBn ' :,auBe ' llretllrn SANS VISUALISATION DE LA MUSIQUE" «cur»or45, 160ipr 

fl l~ n V tnenpau»e.2:r»turn int"->3 ODNTINUER L'AIR PflOGRAMMER" 1 cursor 43, 140ipri 

50 ifOB(O)- n thBnpauBB.2ireturn nt"->4 AVOIR LE MODE D'EMPLOI" 

*; Sip! n, .!!..^" np * US ".' rm V Jrn 133 ciiraor45,120iprlnt"->5 PROGRAMMER UN AIR"icurso 

*? JI™ 2 = „ „!u enpaU ™ " rn r43,100iprir.t"->6 C0RRI6ER DES NOTES". curBor45,B0ipr 

u >*" ° = ii I< - t ^ en P* us «- i:r " turn int"->7 METTRE UN MORCEAU SUR CAS- SETTE" icursor43,6 

34 ifCB(Q)- r tnenpauae.BirBturn Oiprlnt"->B ENTRER UN MORCEAU D'UNE CASSEtTE" icur 

55 ifC«(0) = "»"thBnpauael.2 ! return sor45, 30: print"->9 ARRETER" 

„^ n ? 7 ^ < S > A 5O "l! bl0 '" Oljtput " DDe " ,R,W ' Z!QutpljtY * ( 134 HS=i n str«(l) 1 X-val(H*).ifX<lorX>9the n gotoI34 

^"£",G,19i+H,2irBturn i3s if X -7th»r>g D t D 172 

57 ton«73.C(0) S rrturn 136 „ X -Bth.ngotol80 

M^? n r' 6 ^ 10> o 9D *" lbl0i " OUtpUt " RE£ "' R ' W ' 2 ' t,UtputV * 1 137 i*X-lth«nT=OicolorO,l,2,3igotol23 

£ ,G,201+H,2ireturn 13B i f x-4thHnT=0:colorO, 1 , 2, 3: goto200 

39 tone67,C(0>.r.turn ,39 if X =3thenT-0:colorO, 1, 2, 3: gotoB7 

il6B,C(0)tgoaubl06: output "DO", R,W, 2: output YB( 140 if x=9thenuar0 

0>,G,133*H,2iraturn 1Ai if x«3thBnP=li T=0: colorO, 1, 2, 3i gotol23 

61 ton.l6B,C(0) I return , 4Z if x=6thengotol57 

62 tDnBl4B,C(0)sgoaubl06:output"Re",R,W,2:outputY»l 143 ifX-2thenO=0 
0),G,165+H,2i return 144 0=0*1 : if A(0>=-56thBngotol31 

63 tonel4S,C (OH return 1 45 onA(0)go5ubl9, 21 , 23.25, 27,29.31 , 29, 33, 35, 46, 57, 

64 ton.U7,C(0> : go6ubl06loutput"FA£",R,W,2:outputY» 59, 61 , 23, 63, 65,67,68, 70, 72, 76, 7B 
(0)+"£",G,176+H,2:rBturn 14fi ootoI44 

65 tonel 17 C (0) .return 147 itCMtQ) — d - thftYlC (0) -50. Y» (0)=chrB 1200) : return 
n "^ n " 9 ! o ^ ( ° 1 i aDSUb,06!OUtpLJt Lfl£ ' R ' lg ' 2:outputY * ( 1« ifniat — d.-thenceta) — .-■C(a)-7SiY«tOI-chr*(20 
□ )+ £ , G, LOcj+H, 2e return 0)*" "-return 

67 tonB91.C(0). return 14?" ifCS(O) ="c"thenC(0)=100.Y»(O)=c:hr«<199) .return 

68 ne pas effacer cette Ugne 1 =0 if c» (0) ="c. "thenCB (0) = "v" 1 C(O) -150: Y» (D) =chr« 1 1 

69 tone33,C(0> : gosub 106. output "FA£" , R, W, 2: outputY* ( 99) +". ", return 

Q 7n"f"' E ^ 1 rtrl' 1 2:r ! tlJrn 151 >*C*(0) = "n"thenC(0)=200iY«(0)=^r«(193):return 

70 tonB55,C(0):return 152 i f C B (0) -"n. "thenCS (0) -"»" : C(0)=300: YS (0) =chr« ( 1 

71 tonB59,C(0) : goaub 106. output "FA",R, H, 2: outputY* (0 93) +"." .return 

) ^" 2 " + £o 2 r^r,t U '" n .. 155 if" (DI="b"thenC ID) =400: Y*(0)«chrB(192)t return 

II t on "5 o .C!0): return 154 ,f c , (D ) ="b. "thenCS 10) ="«" : C (0) =600 = Y« (0) =chr* ( 1 

73 tone59,C(a):gosubl06:output"FA",R,W,2:outputY»(0 92) +". '^return 

),G, +H, 2: return 1 55 if c« !0) ="r "thenC (0) =B0O: YS (0) =chr* ( 194) : return 

74 tone59,C(0) : return 1 56 if CS (0>-"r . "thenCS (0) ="w":C 10) =1200: Y* (0) =chr» ( 

75 tonel04,C(0) : goaub 106: output "SOLE" .R, W, 2: outputY 194)» return 

«(0)*"£",G, lBl*H,2.return 137 colorO, 1 , 2, 3.,T=0t gOBubl 15:0=0 

76 tonel04,CI0) ireturn 158 0=0+1 : i f A (0) ='-56thengotol Zl : elaegoaubl4 

77 tonel5B,C(0):goBubl06:output"D0£' , ,R,W,2:outputY» 159 D*=i nstr* 1 1 ) : , f asc ( D ») :<8andasc IDS ) :9thenootol 
(0)+"£-.G. 155+H,2:return 59 




Zrn 



160 if asc (DS) "Bthenpl otR, W+85, 3*0, 95,0i'f orF'-l 
30step-10.1ineR,F,R+30,F, 1 tnex t : A»-instr» ( 1 ) 1 A (O) =a 
c (AB)-99ielBBgotol71 

161 if A(0XlorA(0)>23thengotoI60 

162 C*(0>-inBtrStl> 

163 ifC«(0>X"b"andCS(D) X"c"andC»(0) X "n-andCS (0) 
<"r"andC«(0)O"d"andC» (0) >< " . '■thengoto!62 

164 ifC*[0)><"."thengotol6B 

165 PB-instrS(l) 

166 ifP«><"b"andP*><"c"andP»><"n"andP«><"r"andP»<> 
d"thengatol65 

167 CS(O)-P*+0*(0) 
166 gosub 147 

169 gosub 14 

170 goto 139 

171 gotolSB 

172 wipe:brightl.pen2 iprinttab (6) j "IPOUR METTRE VO 
TRE CASSETTE A L'ENDROIT OU L' ENREGISTREMENT DOIT 
AVOIR LIEU i->APPUYER SUR " ; :penl :print "R" ipen2.| 
nt"ET SUR "jipenliprint"RET0UR":!pen2:print" DU " 
enl.print"AV.RAP":pen2 

173 printiprlnt-iprintiprinttab(B):"*POUR ARRETER AP 
PUYER SUR N'IMPORTE QUELLE TOUCHE" : print" ET SUR ' 
en 1: print "STOP-EJECT" 1 pen2i print 1 print: print :prii 
b(B)|"tPOUR ENREGISTRER APPUYER SUR " ) : pen 1 : prinl 
RITURE "|ipen'2iprint"PUIS "upenl 
_174 print"LECTURE"ipen2iprint"ET SUR "upenlipr; 



P>n2 



175 I 

176 ifH*-' 



c > < ■■ 



iisavetCiforM=lti 



"thengotol75 
-liE(M)=asc(C*(M) 



17B uviILemvi 

)mextiBave*E 

179 goto! 3) 

1B0 Mlpeibrlghtlipen2 iprinttab (B) ; "*P0UR METTRE VO 

TRE CASSETTE A L'ENDROIT OU L'ENREGISTREMENT I 

AVOIR LIEU i->APPUYER SUR " | ipenl iprlnt"R*ipen2ipri 
nt'ET SUR "i]penIiprint"RETDUR"iipen2iprinf OU "j:p 
enliprint"AV.RAP"ipen2 

181 printiprint:printiprinttab(B , )i"*POuR ARRETER AP 
PUYER SUR N'IMPORTE QUELLE TOUCHE"iprint"ET SUR "jip 
enliprlnt"ST0P-EJECT"ipen2iprintiprint:print>printta 
b(B>|">P0UR CHARGER APPUYER SUR "jipenl 

182 print"LECTURE B ipen2iprint ,1 ET SUR " [ i penliprint" 
L"ipen2 

1B3 H»-instr»< 1 ) 1 If H»X"I "andHBX-r-'thengotolBS 
1B4 ifH*-"r a trienreHlndigDtnl80 

183 loadtLilo«daAiload*CtloadtEiforM-ltoL(l>iC«(M>- 
chr*(E(H>) 

186 O-O 

1B7 O-0+ltifA(O>— 36thengotol31 

166 C«(0)-chrS(E(0)) 

1B9 ifC(O)-50thenY*(0>=chrB(200> 

190 ifC(0>-75thenCB(a>-"a":Ys(0>-chr«(200>+"." 

191 ifC(0>-100thenYS(0)-chr*(199) 

192 ifCCO)-150thenO*(0)="u"iY*(0>-chrS(199>+ n ." 

193 ifCCO)*200thenYS(0>-crir*(193) 

194 ifC(a)=30OthenCS(O)-"* , 'iYB(0>=[:hr*(193) + ''." 
193 ifC(O)-4O0thenY*<0>-t:hr*<192) 

196 lfC(0)»600th«nC«(0)- , 'x"lY«(0)-chrS(192H-"." 

197 ifC(0)=B0OthenY»(O)=chr«(194) 

198 lfC(0)-12O0th«nCSCO)-"w"tY»(0)=chr»(194)+". H 

199 goto 187 

200 color0,6,1.7:Hlp»ibrightliscreen30,220,lB0,190: 
cl s2i pen liprinttab (9> | "TRANS-MUSIC": print 

201 pen3iprinttab(4)i"tPOUR PROGRAMMER UN AIR , IL 
FAUT D'ABORD ENTRER LA NO-TE (DO, RE, MI , D0£,RE£,etC. . 
.) PUIS SA DUREE (RONDE, BLANCHE, NOIRE. C ROCHE , DOUBLE - 
CROCHE) . "1 print ipenl iprinttab (5) : "LES NOTES" 1 print 

202 pen3)print" tChaque touche de la rangee Q -> M 
reprtsentent respacti -vement les notes DOg REg MIg F 
Ag SOL LA SI DO RE MI et la touche X reprcsente le F 
A al-gu. ( Le g indique lea notea graves) . ":gosubl5: 

la rangee Z -> P repre 
tea D0£g RE Co FAg FA£g 
SOL£ LA£ DO D0£ RE£ etla touche w repreaentent le F 

A£aigu." 1 penliprint iprinttab (4) ; "LES DUREES" ipan (3) 1 

print 

204 print- *Apr*s avoir entr* la note, il faut enti 
er aa durte. " iprinf'La RONDE est representee par le 
R":print"La BLANCHE eat representee par le B":gosu 
bl5:printiprint"La NOIRE est represents par le N":p 
rinf'La CROCHE est representee parle C" 

205 print "La DOUBLE CROCHE eat representee par le D 
"iprintipenliprinttab (4) i "LES NOTES POINTEES"ipen (3) 

dureede la r 



206 i 



suff : 



iliprinfLES ";chrS(3 

feetivement aurce programme )es PAUSES lea DEMI-PAU 
SES lea SOUPIRB les "| 

207 print" DEMI-SDUPIRS et les QUARTS DESDUPIR5. " : 1 
rint" tpour entrer cea " ;chr« (34) i "PAUSES"ichr»(34) ; 
" ilauffit d'appuyer sur N puia de rentrer la dure: 
."iprint"R ■ PAUSE ";chr«U97>i 

20B prinf'B = DEMI-PAUSE "i chr» ( 197) ipr: 

nt"N = SOUPIR "ithr»(195)iprint"C = DEMI- 

60UPIR ";chr»(19B) :print"D - QUART DE SOU 

PIR " ;chr* ( 196) I goaub 15: pen 1 1 pri nt 

209 printt»b(4>i"LES ";chr» (34) [ "PAUSES" jchrS (34) j " 

P0INTEES":print:pen3iprint" til est possible de poi 
nter les " ichr»(34) ; "'pauses"; chr»(34) ; " . II suffit d 
'appuyer sur . avant de rentrer la dur*e"iprintipenl 



210 prir 



"EXEMPLE":print:pen3iprint"-Si vous voul 
DO grave ronde, vous appuyer surQ puis su 
r R"itonel6S,800:print"-Si vous voulez avoir un RE 
grave ronde pointe, voua ap- puyer surS puia sur. el 
enfin sur R": tone 148, 1200 

211 goaub!5:print :print"Si voua voulez avoir un qui 
rt de aoupir, vous appuvez aur N puia Bur D":print"! 



BACK SPACE et en 



MEYNAUPEDE 



Si vous reussissez I'exploit de taper ce programme 
sans vous tromper dans les "DATA", vous aurez droit 
a un jeu qui pourrait bien avoir raison de votre sante 
mentale. 

Fred HABAUZIT et Ted PASQUIER 



10 HEM 
29 REM fred HABAUZIT et 
38 REM ted PRSQUIER 
48 REM 

58 REM Presentent 
68 REM 

78 REM MEYNAUPEDE 
86 REM 

99 DIM x<258>,n(250) 
136 MOOE 1 
110 fl«-CHR«t240> 
120 f2«=CHR*C241 > 
130 f3»-CHR«<242) 
140 f 4«-CHR*C 243 ) 
150 REM 

168 REM Presentation du j«U 
170 REM 
180 CLE 

190 WINDOH 5.35,5/22 
283 INK 1.24 
210 INK 2,6.7 
220 INK 3,26 
230 LOCATE 13,1 
240 PEN 2 

230 PRINT "MEYNAUPEDE" 
260 LOCATE 5.3 
270 PEN 3 
280 PRINT "Par fred and ted (1905) 

290 BORDER 13,18 

300 PEN 1 

310 LOCATE 1,7 

320 PRINT "t' re9les de ce jeu 9er, 



670 REM * * * INITIALISATION * * * 

080 MODE I 
890 BORDER 
900 RESTORE 
910 Pt"0'Pfl-0 
920 tPS-0 
930 nu-0 

940 JC"B ' nb=0 1 1*"0 

958 SYMBOL AFTER 1 

960 SYMBOL 160, 0.8,8,8.0, 8.8.8 

978 SYMBOL 147,24.24,24,31,31,0.8 

988 GOTO 1730 

990 x«6'M=2 

1880 kcz: 



1016 



>-6<¥<l> 

>qn0 



i PR» 



■i PRINT ' 
'i PRINT ' 



IP lacement i 



330 PRINT'PRINT "4' redefinition d 
es tOUCh«*" 

360 PRINT'PRINT "5' Joystick" 

370 z»=INKEY«'IF z»-"" THEN 370 

388 IF z«= , 'i■ , THEN 718 

390 IF z»="2" THEN CLS 'GOTO 880 

480 IF z««"3" THEM 110 

410 IF z»«"4" THEN 588 

420 IF z*<>"5" THEN 378 

430 REM * * * JOYSTICK * * * 

440 fH-CHRMll) 

450 f2*"CHR«10> 

468 f3S=CHR«(B) 

470 f4«-CHR»(9> 

488 GOTO ISO 

490 REM REDEFINITION 

500 CLS 

519 LOCATE 3,1 

520 PRINT "redefinition" 

530 PfilNT-PRINT-PRINT "HHUT ? "i 

550 GOSUB 679'flS-b" 

560 PRINT^PRINT"BAS T "J 

500 GOSUB 679'f2»»b» 

590 PRINT'PRINT "GAUCHE f "i 

610 GOSUB 670f3»=b» 

628 PRINT'PRINT "DROITE ? "i 

640 GOSUB 678<f4»=b« 

650 CLS 

660 GOTO 200 

670 bf=INKEY»<IF bt<>"" THEN PRINT 

b* ELSE 670 
675 SOUND 1,2056,10,7 
668 PRINT "OK" 
698 RETURN 

708 REM REGLE DU JEU 
710 CLS 

720 PRINT " bonJour et bienven 
uCe> au beau ro»*ume de MEYNAUPED 
E le ehenl 1 le.Comme vous le savez 



1033 ti-TIME 

1048 PEN 1 

1830 LOCATE 23.25 

1B6B PRINT CHR9(164>j 

1070 PRINT ■ .fred S. t 

1088 PEN 2 

1890 LOCATE 26.15 

1100 PRINT "HAUT ■ ' 

1118 LOCATE 26-17 

1120 PRINT "BAS 

1138 LOCATE 26,19 

1140 PRINT "GAUCHE' ";f3» 

1150 LOCATE 26.21 

1169 PRINT "DROITE' "jf49 

1170 PEN 3 

1180 LOCATE 26.23 

1190 PRINT"STAGE'"Jt« 

1280 REM * * * DEPLACEMENT » * * 

1218 M— Pfl»CPflO2S0> 

1220 Pfl-Pfl+1 

1230 Pt"-Pt*(Pt<>259) 

1248 Pt-Pt+1 

1230 xCPt)-x'*tPt>"!( 

1260 LOCATE x.V 

1278 PRINT "B" 

1200 LOCATE x(P<n.M<Pfl> 

1290 PRINT " " 

1380 GOTO 1330 

1318 X(Pt)-X'lKPt>"!. 

1320 LOCATE x,a 
1330 PRINT "B" 

1340 REM CHOIX DE LA DIRECTION 
1350 A9-INKEY0 

1360 IF A»-fl» OR 4»-f2» OR fl»=»f3» 
OR flt-f4S THEN »«"flS 
1378 y-¥+<*9"fl0>-C»0"f29> 
1380 K-x+<*0"f3»>-t*i"f40) 
1399 fl-TE8Kx*16-9.C23-»>«16+6) 
i ON 0*1 GOTO 1210,1410.1440,15 



user fluelflues sefluelles 
ssv v cho 1 o!l<™. Attent lc 

ladle e»t contaflieuse, r 



(lit; 



PPM 



lillti 



749~ji-INKEY»'IF *»-"" THEN 740 
738 CLS 

760 'PRINT "Bien Pas son* • de* cho 
*e* Plus «erieu*e».L* reflle e*t s 
i*Ple..Vou» devez Wider MEYNAUPED 
E au milieu de* Jardlns de GIRRRD 
chaflue foi* flue MEYNAUPEDE man 

M une Pastille, elle 9ro»»itMals a 
ttention elle tie dolt Pa»»e mordre 



AMSTRAD 




1970 y*-INTCRND«23>+2 

1988 IF xx-6 AND as>"2 THEN 1968 

1990 LOCATE xx.«* 

2000 IF TESTlxx*16-9.'25-»s '*16*6 ' 

O0 THEN 1960 

2010 PEN 2 

20Z0 PRINT CHRK1441 

2030 NEXT 1 

2040 GOSUB 2078 

2050 GOTO 998 

2860 REM RFFICHAGE SCORE. TEMPS 

2070 hi— hi*<hi>«sc)-5C*(hi<*c> 

2080 LOCATE 25,5 

2090 PEN 2 

2100 PRINT "SCORE ' " I 

2110 LOCATE 32.5 

2120 PEN 1 

2130 PRINT sc 

2148 LOCATE 25.2 

2158 PEN 3 

2168 PRINT "RECORD'"lhi 

2170 IF ta-1 THEN RETURN 

2190 LOCATE 25.8 

2190 PRINT "TEMPS '"i 

2200 LOCATE 24,10 

2210 PRINT INT'tP«^1800e>; 

2228 PRINT "MIN") 

2230 PRINT INTCtPs'300-INKtP*'lB0 

ee>*60>; 

2240 PRINT "SEC" 

2250 RETURN 

2260 ENV 1.188,3,1 

2270 ENT 1,188,2.2 

22B8 SOUND 1,200,10,1,1,1,5 

229B RETURN 

2300 REM PREMIER TABLEAU 

2310 DATA 21,6,26.21,76.18,14,14.1 



0,09 

2E00 DATA 09,84,20,04,09,04,14,18, 

13,20,09,20,07,10,14,04,89,04,20,0 



20, 20, 04, 09, 04, 20, 20, 04, 20, 20, 20, E 



DATA 09,04,09,20,10,14,14,14, 
4.20.09,20. 14, 14, 14, 14, 14, 16,2 

2610 DATA 09,20,09.20,04,20,04,09, 0,09.04,09 

04,28.89.28.04,09,04.20,04,20.09.2 3020 DATA 09,20.84,20,09,04,29.20, 

0,99 04,20.29.94,20,20,04,29,20,04,09,2 

2620 DATA 09,20,11.14,14.14.04,09, 9,84,20,09 

20.14,19,14,20,09,04,14,14,14,17,2 3030 DATA 89,94,89,28,09,84,89,84. 

0,89 14,14,20.09,20,14,14,04,09,94,99,2 

2639 DATA 09,04,89,20,04,29,20.20. 9.89.94,09 

04.29,99.20.04,29.29.20.04,20,89,0 3040 DATA 09,20,83,84,20,28.89,84, 

4,99 20,20,04.89,04,20,28,94.99.29,29,9 

2649 DATA 09,29.09.04,10,14,04,14, 4,09,20.99 

16.29.04,20,10,14,04.14,16,04,09,2 3050 DATA 09,20.97,14.04,14,13,14. 

9,89 14,04,14.15,14,04,14.14,13,14,04.1 

2630 DATA 09,04, 99,20, 09, 04, 2B.04, 4,13,20.09 

09,20,09,28,09,04,20.04,09,20,89.0 3069 DATA 09,04,20,20,20,04,20,20, 

4,09 20,20,20,04,29,20,20,20,20,04.20,2 

2669 DATA 89,20,04,29,99,20.09.20. 0,20,04,09 

89,84,89,04,09.20,09,20,09,20,04,2 3970 DATA 07,14,14.14.14.14,14,14, 

-, (» 14,14,14,14,14.14.14,14,14,14,14,1 

4,14,14,13 

3090 REM OUATRIEME TABLEAU 
3090 DATA 96,23.24.23:114.10,14.14 

2690 DATA 09.28.04,20,84,28.89.20, , 14, 14. 14, 14, 14, 14, 14, 14, 18. 14, ~ " 

20. 20, 99, 29, 20, 28, 89. 20, 04, 28, 94, 2 

0,09 

2698 DATA 1 1 . 14,29, 14, IB. 14. 15, 14, 

94, 14. 19, 14.A4, 14, 15, 14, 18, 14,29.1 



Z7P«3 DATA 99,2 

20, 04. 89, 04, 2E 

0,09 

2710 DATA 09, i 



14,14,14,14,14,14, . 

3108 DATA 99,84,29,29,29,84,20,28, 

04,29,28,99,20,20.04.20.20,84,20,2 

0.20.04,89 

3118 DATA 09,20,09.04.14, 

14, 14, 04, 09,94, 14, 14, 14, IB, 14, 14.9 

4,09,29,99 

3120 DATA 09.20,09,04,20,04,99,2. 

94,29,29,20,29.20.04,20.09.94.20.9 



}09 



1.14,14, 



1,14,14,14,14, 



..16 



I, 14, 14,10 



14,14 

2320 DATA 09.94.20,29.29.20,28.29. 

84, 20. 20. 29. 04. 20. 29. 20. 28, 20, 2 

4,09 

2330 DATA 09,20,18.14,14,04,14, 



1,09 



3,20.29.29.20. 
2«. 20, 20. 26. 28, 20, 20, 20. 20. 20. 99. 2 



2739 DATA 99,29,11,14,84,14.13.04. 
14,14,19,14,14.84,97.14.94,14,17.2 
9.09 

2740 DATA 99.84.09,04,28.20.20.28. 
28,04,99,84,28,28,29,29,20.84,99.9 



r mourn It ■ 



le 



770 PRINT " ( 
h*mP«-'PRINT' 

780 a«-INKEYSJ<IF «•-"" THEN 780 
790 CLS 

889 PRINT "Sachei 4ue cheflue P«»ti 
lies 4u# MEYNAUPEDE m»n9*r« vo 
U» r»PPorter« 11 Points. De Plu». 
letenPs lue vous nettrez Pour 
r«lr» chUue* t«tol mux, vous donn 
«f«s un certain BONUS. Vous devei m 
ettre mains de 1 minutes". 

818 PRINT"et 38 second** Pour eh* 
flues t*blt«ux.Un eutre bonus de 
190B Points. vous est iceorde 
cheque fols flue vous Hmm un t 
»ble«u" 'PRINT "Une dtrnltre conslB 
ne.sechez flue 1 ' important n'est 
Pas de PartlciPer mais de »«vner 

829 PRINT ' 



28 

1419 '.•■»-'.>-n«)"i»'f3»» 

1420 x-x-( a»-f 3> H< «0"f 4« ) 

1439 GOTO 1310 

1440 nto-nb-M 

1439 GOSUB 2269 

1469 Pt"-Pt*< Pt<>250 J 

1470 Pt"Pt+l 

1480 REH TE8T CHRNGEMENT DC TABLEA 
UX 

1499 IF nbOkc+nu THEN 1310 

1500 GOTO 16B0 

1510 REM PART IE TERM1NEE 

1320 IF x-x(Pt-l) AND »«»CPt-l) TH 

EN 1418 

1330 sc-sC+nB«ll 

1340 GOSUB 2070 

1350 LOCATE 24,10 

1360 PRINT SPACED 13> 

1370 LOCATE 25,8 

13S8 PRINT SPHCE«C 13) 

1390 GOSUB 3350 

1680 LOCATE 25,8 

1619 FOR t-l TO 2888 

1628 NEXT i 

1638 PRINT " UNE AUTRE T" 

1648 dsWNKEYHIF d*-"" THEN 1640 

1638 IF d»-"o" OR de-"0" OR <H-"X* 
THEN CLB'GOTO 900 
1660 IF c»-"n" OR d«-"N" THEN CLS' 
GOTO 19B 
1678 GOTO 1640 
1600 tP»-TIME-tl 
1690 REM CALCUL DU SCORE 
1700 IF tPs<36800 THEN sc-sc+38880 
-tPs 

1718 sc»sr:*nb*l 1 
1728 REM CHANGEMENT DE TABLEAU 
1730 nb"0 

1740 ENV 1,100,2,2 
1759 ENT 1,190,-2,2 

1769 SOUND 1,284,209.1,1.1 

1770 READ *l.«2.a3,flu.kc 
1798 INK 1,«1 

1790 INK 2,*2 
1888 INK 3,a3 
1810 CLS 

1020 FOR 1-1 TO 23 
1838 FOR a-1 TO flu 



28.04,20,94.20,20,20,04.05,04.09,2 

0,99 

2379 DATA 09,29.05,28,20,29,99,29. 

18.14.94.14,16.20,09,29,28,20,03,2 

9.89 

^1R9 DATA 89,04.20-28.10,14,13.20. 

0O ■ 20. 2f . 29 ■ 09 . 29, 97 . 14 - 1 E ■ 2 1 * i2fl ■ B 



2760 DATA 89.20. 99, 94,09,94 .28,99. 

29.04.89.84,28,09,29,94,99.94.09.2 

0,09 

2770 DATA 09,04,09,20,09,20,14.13. 

04.14,13,14,04.97,14,29,99,20,09,0 



2780 DATA 09,2 



3149 DATA 09,20.09.20,09.04,09,20, 
04,28,20.09.29.29,94,29.99.04.09,2 
8.09.20.09 

3150 DATA 09,04,04,20,09,20,20,28. 
10,14,94.09,04,14,16,29.20,20,09,2 
0,94.04.09 
3160 DATA 11,14-14.14.19,14,04,14, 
17,29,28,09.28.28,11,14.04,14,19,1 
4,14,14.17 

3179 DATA 89,84.94,20.09,94,20.20- 
99.04. 14,15.14.04.09.20,20,94,09,2 
8.04,04,99 

3180 DATA 09.20.99.20,20,20,99,94, 
29,28,94,29,94,29.29,94,89,29.20,2 
n. 89-29. 09 

3190 DATA 09.29,97,14,04,14,13.1 
14,04,14.18.14.14,14,94,11,14.84,1 



2409 DATA 99,94.29,29.99,20.14,14. 
17.04-89,84-11,14.14,20.09,28.28.8 
4,09 

2410 DATA 09.28,89,84,20,20.28,04, 
99,28,89,29,99,84,20,20.20,04,09,2 



0,09 

2809 DATA 09,04,20,20,29,20,04,29. 

20,20,09.20,20,20,04,20,20.20.29,9 



1,13 



1. 14, 



J.29.09, 20, 89,28, 14,14.17,2 



2829 REM TROISIEME TABLEAU 

2839 DATA 7.24.29.23.196,10,14,1 
14,14,14,14,14,14.14,14,14,14,14 
4,14,14,14,14,14,14,14.16 

2840 DATA 09,04.29,20.29,94.29.2 
29, 20 ,20, 04, 20. 29. 28. 28. 29, 04. 2€ 



2440 DATA 89. 28, 09. 2 



,13.20, 



143 1, 



1848 READ b 

1850 PEN l-<b»4) 

1869 PRINT CHReX 

1879 PEN 1 

1989 NEXT a 

1899 PRINT'NEXT i 

1999 REM ADDITION DE 



99,20,89.29,99,29,97,14,14,29.99,2 

9,09 

2430 DATA 99,20-99,20,04,29,29,94, 

99.20.99,29,99,04.20,20,94,29,09.2 

9,09 

2460 OATR 69,84,28,29,89,28.14,14, 

17,04,89,84,11,14,14,28,89,20,20,0 

4,09 

2479 DATA 11,14,14.94.99.84,29.94, 

09,29,09,20,89.84,28,94-99,94,14,1 

4.17 

2498 DATA 89,84,28,28,87.14.16-28, 

09.20,28,29.99,28,19.14.13.20,29,9 

4,09 

2490 DATA 09.29,99.20.29,20,09,20, 

07,14,04,14,13,20,09,20,20,20,09.2 

2599 DATA 09,20, 09, 04, 09. 94, 20,29. 

29,94,20,94,20,20,29,04,99,04,09,2 

0,09 

2310 DATH 99,04,99.29,97,14,14,14, 

04,14.14,14,04.14,14.14.13,29,09,9 

4,09 

2320 DATH 09.20.99,20,20.20.28.20, 

20,20,20,20,29.29,20,29,20,29.09,2 

0,09 

2530 DATA 99.29.07.14,14,04,14,14, 

14,14,04,14,14.14,14.04.14,14.13,2 

0,09 

2340 DATA 09,04,20,20,29,29,29,29. 

04.20,20.20.94,20,20,29,29,20,20,0 



2350 OATR 07,1 



,14.14- 



191? 



i"t«+l 



' <tafe2 une touch 19»> ' F t*'4=INT< t*.-4> THEN RESTOR 



1930 IF ta<3 THEN 2040 

1949 nu-23*<INT(ta'4)> 

1950 FOR i"l TO nu 

I960 xx"INT(RND*<Au-2>>-> 



IS. 14. 14, 14. 14. 14. 16 

2380 DATA 09,04.20,20.94.29,89,28, 
04,29,20,20-04-20.89.29,94.20,29.0 



4.16.29,09 

2869 DATH 99,20,99,84,29.20.09.04, 

29,29,04.99,04-20,20,94,09,20.29.8 

4.99.29.99 

2879 DATA 99.84,09.28.09.84.09.29. 
14,14,20,99.20.14.14.04.09,04,99.2 
8,09-94,99 

2880 DRTA 89.28.04,20,09,04.20.20. 
P4. 20, 28, 84. 28, 28. 04. 20-20- 04, 99. 2 
0,04,29,89 

2898 DATA 09.29.09.28,97, [4. 14 . 14. 

14,14.28,09,20,14,14.14.14,14,13.2 

8,09,29,99 

2900 DATA 09,29.09.94,20,04.29.04. 

28,28,94,99.94.20.20.94.29.04.20.9 

4,09.28.89 

2910 DATA 09.28.07,14.14.04.14,14, 

14,18,14,13,14,18,14.14.14,04.14,1 

2928' DATS" 99, 94. 28. 20 -20, 20- 28. 04. 

29.99.04.28,84.09.20.04.20.28,20,2 

0,28,84.89 

2930 DATA 11,14,04,14,14,18.14,14, 

20, 09, 20, 09. 20 .'99, 29. 14, 14, 19, 14,1 

4.04,14.17 

2949 DATA 89- B4. 20, 84. 20. 09,20. 04- 
20,94.29,99.29.94.29,04.20,09,29,9 
4,29,94,89 

2950 DATA 89.29,14,14,28.20,29.14, 
14.14,14,19.14.14,14,14.20,29,20,1 
4.14,20,09 

2960 DATA 09,04,20,94.29,09,20,94, 

29,94-20,09,20.04,20,04,20,09,29,9 

4,29,94,09 

2979 DATA 11,14,94,14,14,15,14,14, 

29,09,20.09,20.09,29,14,14.15.14.1 

4,94.14,17 

2999 DATA 89,84, 29. 29,29. 2B. 29. 94, 

20.09,04,29,04.99,20,04.20,20,20.2 

0,20,94,09 

2999 DATA 09,20.10,14,14,04,14.14, 

14,13,14,18,14,13,14.14,14,94,14,1 

4.16,20,99 

3900 DATA 09,20,09,04,29,20,20,04. 



4.28.04,09 

3219 DATA 11,14, 14,14, 14.04,14. 14, 
14,14,20,04,29,14,14,14,17.04.14.1 I 
4.14/14,1? I 

3220 DATA 09,94,20,04,28,20,20,94, 
29,20,84,99,94,94,20,29,99,39,29,9 
4,29,94,99 

3239 DATA 99,29.19.14,94,14,18.14. 
14.84,14.13.14,14,14,84,11,14,04,1 
4,16,20,09 

3240 DATA 09,29,09,29,29,20,09,94- 
29,29,04,28,84,29,29,94,99,29,29,2 
9,09,29,99 

3239 DATA 09,04,94,20,09,04,28,28, 

09.04,14.10,14,04,09,20,28,04,89.2 

0,84,04,89 

3260 DATA 11,14,14.14,19,14,84,14, 

17,20,29,89,20,20.11,14,04-14,19.1 

4,14.14,17 

3278 DATA 09.04,04.28,09.20,29.20. 

97,14.84,99,94,14,13,29,29,29,09,2 

0,04,94,09 

3290 DATA 09, 20,09, 20. 09, 04, 09,1 

04,20,28,89,20,29,94,20,09.04,0; 

0,09,29,89 

3298 DATA 99,04,99,20,09,20,89,94, 

14,14,14,15,14.14.14,94.09,29-09.2 

8,99.04-99 

3308 DATA 09.20.09.04,20,04,99,2 

04,20,20,20,20.20,04.29.09.04,20,0 

4,09. 28,89- 

3310 DATA 99,29,99,04.14,14.15,14, 

14, 14.94,09,04, 14,14, 14, 13,14, 14.fi 

4.09,20,09 

3320 DATA 09.04,20,29,20.04,20,29, 

84, 20, 29,09, 20. 20, 04, 20, 20,84, 20, 2 

8,20,84,09 

3330 DATA 87,14.14,14,14,14,14,14. 

14, 14, 14. 19- 14, 14. 14, 14, 14, 14, 14, 1 

4,14.14.13 

3349 REM HU8IQUE FINALE 

3350 SOUND 1.909.199.19 
336B SOUND 1.9.2 
3370 SOUND 1,309,79,13 
3399 SOUND 1.0.2 
3390 SOUND 1,599,25,15 
3499 SOUND 1,0,2 
3419 SOUND 1,425,75,15 
3429 SOUND 1.9,2 

3439 SOUND 1.459.23.19 

3440 SOUND 1,9.2 
3450 BOUND 1,450.73,13 
3460 SOUND 1.0.2 
3470 SOUND 1.599.29,15 
3489 SOUND 1,9,2 
3499 SOUND 1,599,75,15 
3508 SOUND 1,0.2 
3518 SOUND 1,525.23,13 
3528 SOUND 1,0,2 
3339 SOUNO 1,380,199.13 
3940 RETURN 



* HECTOR 



Suite de la page 5 




ippu-yez bur TAB. Si elle ne vous convient pas 

appuyoz sur BACK SPACE et vous entr* votrB 
e note ainsi Ue sui te" : gosublS: print: penl spri 



OVNIS 



Qu'ont-ils ces etrangers 
A preterer la terre 
Aux mondes par milliers 
Qui peuplent I'univers 



Frederic CARBONERO 



IB HEM *** 
28 REM * = 
38 flEM * - 
40 REM * - 
5B REM * - 

6B REM * FREDERIC CARBONERO — 18/B1/85 ■ 

7B REM "»*«»«»»»«»»»*»**»**<»**»«»*»»* ».»«*». 

9B CLS 

IBB POKE 16561, 2B8sP0KE I 

OKE 16527,127 

11B DATA 2B5, 127, IB, 233,36,69,62, 1,211,253,16,254. 

69,62,2,211,255, 16, 251, 37, 32,239, 2B1 

128 FOR 1=32716 TO 3273B 

138 READ SsPOKE I,S 

140 NEXT I 

145 CLEAR 5300 

150 B=USR(2B11S) 

155 01»=CHR»(184 




39B IF INKEY*" 
94B GOSUB 95 B 
945 GOTO 1B0B 
95B CLS= PRINTS ; 
RISEE" ; : PRINTS ( 



THEN 940 ELSE 39B 



16562, 



27JP0KE 16526, 204:P 



■VERSION SONO 
*»*».=OVNIS=* 
RINTa B96, "»* 



X,CHR«C 



: PRINTS I 



<-CHR*< 135)+CHR»< 



+CHR*(139)+CH 



♦STRING* (3,1 28 )+CHR»( 



IBB > +CHR* ( 176 > +CHR* ( 184 > +CH 



175 03*=CHR*( I3S 

R* i 133 ) 

IBB V1*=Q2*:V2*=CHR*(175)+CHR*(144)+CHR*(12B>+CHF 

( 16B ) +CHR* (159) s V3*=CHR* < 1 2B ) +CHR* < 1 39 ) +CHR» < IBB : 

CHR*[135>:N1*=CHR*(191)+CHR*(1BB)+STRINS»(2, I2B)-' 

HR*(191) sN2**>CHR*(191)+CHR*(I3B>+CHR*(173>+CHR*( 1 

4)+CHR*<191) 

1B5 N3*=CHR*( 191 >+STRING»(2, 12BH-CHR«( 139>+CHR*( : 



I1*=STRING*(2,131 ) +CHR*< 191 >+STR: 
=STRING*(2,12B>+CHR*I191 )+STRING*(2. 
G*(2,176)+CHR*(191 >+STRING«(2, 176) s! 
*(I3B)+CHR*(139)+CHR*(14B1+CHR*<1BB 



*(12B)+V1*+CHR* 
I*;-.PRINTS 63,02*+CHR*( 

1 2B ) + s :■ * 



2, 13DH2* 

28>:I3*=STRIN 
*=01*sS2*=CHR 

CHR*(144) :S3* 



NlifCHRt! 



19B PRINTS 1,0 
12B>+I1*+CHR*C 
•+CHR* ( 1 28 > +N2*+CHR* ( 1 2B ) +I2*+CHR* ( 

129,03*+CHR«(128)+V3*+STRING*(2, 128)+N3»+CHR* 1 128 
) +1 3S+CHR* ( 1 281 +S3* ; 
195 FOR T=l TO 1BB:NEXT T 
2BB B=USR( 20058): FOR T=l TO 25= NEXT 
21B B=USR(70I2)sB=USR(14191>iB=USR(1001 
24B PRINTS 257, "I NTRODUCTION 'SPRINTS 3 
B5,*DE NOMBREUX OVNIS ESSAYENT D'ATTERRIR SUR LA P 
LANETE !M-:PRINTa 449,-VOTRE BUT EST DE LES EXTER 
MINER AVANT QU' ILS N' ATTERRISSENT ."sPRINTB 513, "P 
OUR OATILB EXPLOSENT, IL 5UFFIT DE LES PERCUTER AV 
EC 

25B PRINTS 377,'VOTRE VA1SSEAU (PLACE A DROITE DE 
L'ECRAN). "IPRINTS 641, "LE JEU SF DEROULE PENDANT 7 

JOURS, ET CMAQUE JOUR 50":PRINTa 785, -OVNIS TENTE 
NT D'ATTERRIR ET SI PLUS DE IB D'ENTRE EUX V* 
268 PRINTS 769, "PARVIENNENT, LA TERRE NE PEUX PLUS 

LUTTER ET EST ENVAHIE . "SPRINTS B33, "VOUS ETES NO 
TRE SEULE ESPOIR AL0H5 SOYEZ PRUDENT" =PRINTfl B97, ■ 
DEPLACEZ VOUS AVEC LES TOUCHES C ET * SCHR*C92) i : PR 
INT3 976, "BONNE CHANCE- ( 
265 FOR T=l TO 3BBINEXT T 

27B B=USR[2011B):B=USR(987B>sB=USR(180) 
275 FOR T=l TO 33B:NEXT 

2BB B=USR ( 20B5B ) i FOR F=l TO 25INEXT F 
290 B=USR(7023) =B=USR( 14215) :B=USR( 2085B> :B=USR( IB 
0) 

300 PRINTS 994,'APPUYER SUR UNE TOUCHE" ; 
31B FOR F = l TO 8B:G0SUB 4BBB! 
32B FOR F=l TO 2 
33B FOR T=l TO 3sB=USR(987B 



<*•«***•***■ ; :PRINTS 

96B PRINTS 9B1,"08";: 

OTAL i-S-.PRINTS 1815, "80" ; 

965 FOR F=32B0 TO 3300 STEP 1 .52sB=USR(F ) sNEXT F 

970 RETURN 

000 REM — DEBUT DU JEU 

BIB CLEAR 5B8fl:X=5B3:PR 
CHR*<191); s XS=1!L4=1 

020 A=(RND(12>+1)»64 

822 B=USR(3250) 

025 FOR F=A TO A+55 STEP 5 

830 PRINTS F,CHR*(12B>J :PRINTS F+5, CHR»( I32> I 

040 A=PEEK( 1440B) :B=A AND B:€=A AND 16 

858 IF BOB AND X>19B THEN X=X-64:0N XB GOHUB 
B,111B ELSE IF (COB AND X<832 AND X8=2) THEN 
64:G0SUB 121B ELSE IF (COB AND XB=1 AND X<768 
EN X=X+64s GOSUB 12BB 

86B IF F+5=X THEN 140B 

B65 IF X8=l AND F+3=X+( 

B7B NEXT F:PRINTS F," ' 
981,S2iiPRINTS 1815,5: 

18BB, 19BB.42B00 

BBB PRINTS 9Bl,S2;:PRINTa 1B15,5;:G0T0 1028 

IBB PRINTS X+128," -;:PRINTS X, CHR*( 191 ) i : RETURN 
B PRINTS X+64," ";:PRINTS X, CHR*{ 191 > ; sRETURN 

PRINTS X*64,CHR*(191) i : RETUR 



34B B=U5R(B0) sFOR T=l TO 45:G0SUB 40B0=NEXT 

350 E=USR(10B):FOR T=l 

368 NEXT F 

37B FOR T=l TO 3SB=U5R(9B7B> : GOSUB 4000:NEXT 



GOSUB 40BBSNEXT T 



THEN 14BB 
:S=5+lsIF S=5B THEN PRINT 
ON L4 GOTO 1580,1688,1788 



288 PRINTS X-64,' 



"I JPRINTS X,CHR*( ! 



: RETURN 



IF XS=1 
NEXT W 
IF X8=l 



THEN PRINTS X+64, 



1INTS X+, 



218 PRINTS X-64," 

4B8 FOR F2=l TO 5 

4B5 B=U5R(315B> 

418 PRINTS X," 

420 FOR H=l TC 

438 PRINTS X, ■ 

44B FOR W2=l TO 18:NEXT W2 

458 NEXT F2 

468 S=5+l:52=S2+IspRINTS 

121 SPRINTS 1815,S;:IF 5=3fl THEN 
18, 17B8, I8B8, 1980,42888 

465 IF X8=i THEN PRINTS X+64, CHR« ( 191 ) i 

478 GOTO 1B2B 

388 GOSUB 43880 

528 CLSSGOSUB 4BB08:GOSUB 4010B 

538 IF X8=l THEN 01 =S2 : Q2-S-82 :03=S2»18: PTS=Q3sG0 
SUB 4B28B:XB=2!G0T0 1535 ELSE 1558 

535 IF Q2MB THEN 418B8 ELSE PRINTS B96, "PRESS SP 
1 1 X=5B3 

540 A-PEEK(1448B):IF A=12B THEN S=BsS2=B: GOSUB 95 
U PRINTS X,CHR*(191>;;6OT0 1828 ELSE GOTO 154B 

55B 04=S2:Q5=S-S2:Q6-S2»lfl 

568 GOSUB 48288 : PTS=Q3+Q6 I GOSUB 48388: IF 
IN 41880 ELSE PRINTS 896, -PRESS SPACE'; 

578 A=PEEK(144BB):IF A=128 THEN CLSsGOTO 2000 ELS 
: 1570 

6BB GOSUB 43BBB 

628 CLSJGOSUB 48BBB:G0SUB 4B1BB:G0SUB 4B2BB:G0SUB 

40308 

638 0.7=S2:Q8=S-S2:C)9-S2*1B:PTS=PT5+Q9:GOSUB 48408 

648 IF QSMfl THEN 4I8B8 ELSE X8=2s X=4B3s PRINTa 89 

, "PRESS SPACE-; :L4=3=G0T0 1548 

788 GOSUB 43888 

728 CLS:GOSUB 4BBBBsG0SUB 4BlB8=GOSUB 482BB:G0SUE 
■B3BB : GOSUB 4B4B8 : QA=S2 : QB=5-52 : 0C=S2* IB : PTS=PTS+ 
QC:GOSUB 4B5B0 



10 TH 



173B IF C[B; 10 THEN 41080 ELSE XB=l:PRINTa 896,' 

SS SPACE' j:L4=4 

174B A=PEEh( 14400>:IF A=12B 

SUB 95B:PRINTS X , CHR« ( 191 ) ; t 

:60T0 1020 ELSE 1740 

1Q00 GOSUB 43B00 

1B20 CLSiSOSUB 4B080:5OSUB ' 
4B300:GOSUB 4B4B0:GOSUE 40; 

»10:PTS=PTS+QF:GOSUB 4B60B 

183B IF OEilB THEN 41888 ELSE X8=2: X=473 J PRINTS B9 

6, "PRESS SPACE"; !L4=5:G0T0 154B 

1980 GOSUE 430B0 

1920 CLSsGOSUE 4B8B8:G0SUB 4818B:G0SUB 4B28B:G0SUB 
483BB:G0SUB 4048B:GOSUB 48580:GOSUB 40608 :QG=S2:Q 

H=S-S2:QI=S2»18:PTS=PTS+QI : GOSUB 487B0 

1938 IF QH>1B THEN 41888 ELSE PRINTS 896, "PRESS SP 

ACE" ;=L4=6!X=463:G0T0 1548 

2BBB XB=l:X=483:G0SUB 950JPRINTS X,CHR»(191); 

TS X+64, CHR*( 191 ) ;:L4=2:S=0:S2=0:GOTO 1020 

40B8 IF INKEY*<>"" THEN 94B 

4818 RETURN 

40888 Z*=STRING*(£,12B>+CHR*(I7B>:Z2*=STRING*I 

8)+CHR»{174):Z3»=STRING»(lB,128)+CHR*(17B)+Z«+Z*+Z 

*+Z«+Z*+Z*+Z*:Z4*=STRING«(18, 14B>+CHR«! 174)+Z2»+Z2 

»+22»+Z2«+Z2«+Z2*+Z2* 

4B818 PRINTS B, Z3»; :PRINTS 64, Z4*i : PRINTS 128, Z3*; 

SPRINTS 192,Z3»i JPRINTS 256, Z4*i : PRINTS 32B,Z3»;:P 

HINTS 384, Z3»; SPRINTS 44B, Z4* ;: PRINTS 512, Z3*l 

4B82B Z3«=STRING«(6, 14B)+CHR»! 142 ) SPRINTS 576.STRI 

N6*(1B, 140)+CHR*(142)+Z5»+Z5*+Z5*+Z5»+Z5*+Z5*+Z5* 

40B38 RETURN 

4B1BB PRINTS 13,-1" iSPRINTS 28, "2" ;: PRINTS 27, "3' ; 

SPRINTS 34,-4-; SPRINTS 41 , "3- 1 SPRINTS 48, "6» ; sPRIN 
TS 55, -7-;iPRINTS 12B, "OVNIS" ; SPRINTS 192,"ANEANTI 
S";sPRINTS 328, "OVNIS NON"i:PRINTS 384, " ELIMINES" ; 

SPRINTS 512, "POINTS" ;:PRINTS 7B4, "TOTAL s*I 

48I1B RETURN 

48280 PRINTS 139, Ql ; J PRINTS 331 ,0.2; : PRINTS 523,03; 

SPRINTS 712,PTS;:RETURN 

4838B PRINTS 146, Q4 ; sPRINTa 338, 05 i s PRINTa 538,06! 

SPRINTS 712,PTS;:RETURN 

4B4B0 PRINTS 153, Q7; SPRINTS 345 , OB; : PRINTS 537,09; 

SPRINTS 712,PTS;sRETURN 

40500 PRINTS 160, QA; SPRINTS 352, QB; : PRINTS 544, QC; 

SPRINTS 712,PTS;:RETURN 

4B6BB PRINTS 167, QD; s PRINTS 359, QE; SPRINTS 551, QF; 

SPRINTS 712,PTS;iRETURN 

4B7BB PRINTS 174,QG| tPRINTS 366, OH; IPRINTS 558, QI' 

SPRINTS 712,PTS;sRETURN 

41888 FOR F=l TO 18B8JNEXT F 

41818 CLSsPRINTS 452, "VOUS AVEZ PERDU AVEC LE SCOR 

E DE- iPTS 

4182B FOR F=l TO 25B5B=USR ( RND( 1BB)+318B) =NEXT F 

41B3B CLS =END 

42888 FOR F=l TO 8 

42818 ON F GOSUB 4BBBB,4BlB8i 482BB, 48388, 4848B, 485 

88,40608,48788 

42B28 NEXT F 

42838 PRINTS 181 , S2; : PRINTS 373, 5-52; s PRINTa 365, S 

2»1B|:PTS=PTS+(S2»1B) SPRINTS 712, PTS; 

42848 FOR F=l TO 1BBBSNEXT F 

42858 CLSJPRINTS 322, "BRAVO !!! VOUS AVEZ SAUV 

E LA TERRE DES OVNIS ."liPRINTS 45B,"V0TRE SCORE F 

INAL EST'iPTS; 

42908 END 

42918 FOR F=l TO 5BfliB=USR( RND( 1881+2988) --NEXT F 

4388B PRINTS 8, STRING* ( 5B, 128)+STRING*( 13, 12B ) ; : PF 

INT :PRI«IT s PRINT s PR INT SPRINT sPRINT SPRINTS PRINT sPRIN 

TsPRINT:PRINT:PRINT:FOR G=l TO 5B8:NEXT G 

43818 RETURN • 



Tl 99 BASIC 

^^X Suite de la page 

3 




3450 


CALL HCHAR(W.C+1 10 




CALL HCHAR120.C-1, 11 


347C 


CALL HCHARC20.C+1.11 




E=E+B 




NEXT C 


Ssoc 


POS1TI0N-3 


3510 


GOSUB 4240 






5330 


PflS=3 


3S40 


FOR C=3 TO 31 STEP 2 




CALL S0UNDI-50.BB0.2 


3560 


CALL HCHAR<1,C.99I 




CALL HCHAR(1,C+ 1.981 






3590 


REM 



CALL SOUND (4000. 1 

FOR L-l TO 35 

COLL HCHARIL.3. 32, 30) 



TROISIEME F 



3800 


C-C+PAS 




GOSUB 409O 


3900 


CALL HCHAR(L,C,98) 




CALL HCHAR(L,C-1,99) 


;?20 


BOSUB 4090 


3930 




39« 


NEXT I 




CALL 50LMD<-23, 1397,2) 


396C 


CALL SOUND1-50, 2350, 0,4700 




BOSUB 4090 


35BC 


CALL HCHAR(L,C-1,32,2) 




RETURN 


4000 


IP C-P0SITI0N»6 THEN 4270 


401C 


FOR V-C TO 30 STEP 3 




CALL FCH0R122, V,9H) 


4030 


CALL HCHARI22,V-1,99) 




CALL HCFWR(22,V-1,32,2) 


4050 


GOSUR 4090 




CALL SQUND(-50,2350,V-2,47C 






4080 


GOTO 3650 



4420 CALL HCHAR(LI,CO+I.ASClSEB«(( 



4450 
4460 
4470 
4480 



RETURN 

IF PflS"t THEN 4490 

PAS -6 

GOTO 3540 



-> FOR 1 = 1 TO 3 
■) FOR F-1SO TO ; 
1 CALL SOUND (60, 



3270 


CAI 1 


HCHAFi 


4.18,91) 


32BC 


rpi 1 


HCHAR 






CAU 




7,21.91) 


3300 


CALL 


HCHAR 


10,12,91) 








10. IS. 91) 


3320 


CALL 


HCHAR 


10.24,91) 








13,9,91) 


3340 


CALL 


HCHAR 


13,15.91) 


3350 


CALL 


HCHAR 


13,21,91) 








13.27,91) 


3370 


CALL 


COLOR 


8,16.2) 



3670 
36B0 
3690 
3700 
3710 

3730 
3740 
3750 

3770 t 
3780 [ 
3790 C 
3 BOO [ 



DIRECT ION= INT (2«RND)+1 
DN DIRECTION GOSUB 3780,3880 
5 THEN 4000 



3390 FOR C'6 TO 30 STEP 6, 



) CALL HCHORI17.C+1 
) CALL HCHARdB.C.l 
) CALL VCHARU9.C, 1 



3B40 
;S60 



CALL 50UIJDI-25. 1397,2) 

CALL S01MDE-5O, 2350,0, 47O0,C 

GOSUB 4090 

CALL HCHA«<L,C,32,2) 



4160 
4170 
4180 

42O0 
4210 
4220 



4260 
43O0 
4310 



CALL JDYBT(2,X,Y) 

IF X-0 THEN 4260 

IF X— 4 THEN 4210 

IF POSITION'S THEN 4260 

CALL C0L0R(PO8ITI0N+9,2,2) 

POS I T I 0N-PD3 I T I ON* I 

CALL CDLDRIPOSITION+9,5,2) 

CALL 30UND(20O,932,2,349,2) 

GOTO 4260 

IF POSITION-l THEN 4260 

CALL COL0R<POSITION+9,2,2) 

POSITION-POSITION- 1 

CALL COLaR(P0SITI0N+9,5,2> 

CALL S0UND(200,932,2,349,2) 

RETURN 

CALL SOUND (200, 932,2,349,2) 

CALL S0UNDI100, 1397,0,880,0) 

SCORE -SCORE* 1 OO 

A«*5TR* (SCORE) 

CO-9 

LI-24 



4550 r 
4360 P 



AUTRE JEU i 



' GOSUB 4 390 

) CALL KEYIO.K.E 

> IF ST=0 THEN ' 



1 THEN 4640 



1 IF SCORE :=REC0RD 1 
1 REC OFi D= SCORE 
) A«-5TR»(REC0RD> 



ZX DONKEY 



Ca n'arrive qu'aux autres ? Pourtant cette fois. le go- 
rille sentimental et kidnappeur s'en est pris a votre fian- 
cee. Depechez-vous de voter a son secours avant I'ir- 
reparable... 

Patrick CLOUET 
Mode d'emploi : 

Tapez une ligne 1 REM de 320 caracteres et creez avec EDIT A 
lignes identiques numerotees de 1 a 4. le programme effecluera le 
chargement des codes. 
Pour le reste, toul est dans le programme. 



LIGNE: CPiRSCTEHts 

; o cpl nccnc nt a; 

1420 ' ' 

ai?*... 

ai9B... 'P.PPUYER SUR UNE 



NORMAL! OES 



. ;;rppuye« sub une toucme" 



■I,'. 
■■ ■ ■ ■...■.!■.■■: ■..'.: . ■ ■ 

■■:..,■:■ 
■ ■ . ■■ 1 : ■■ ! ■ ■.:■■.. mi ■,.'■,,■„ ■ 



rec-^siBFicC'ee- 



reh aooaeaaaatfkJBeBBoaoBaaiao 



o,\:..- vjo,;: ■ 



■i2il2£H22.iiii2. 



'■"EOr-iOf-if !/..; 



-14.14.44.4444111114*1 
1*1****4*55S555S5555S5S5SEE;:- 

■■ ■ ■ ' ■ ■ ■ ■ 



'■■ ^■■■ z -f- ■■■■■ ■■■ - ■■ <■■■ . ■■' - :":" ';:■;•.-:.■':-■.- '.:'.■ 



:■■ j :;i ji-,-- ;,-. " 



a rem aoftQBeeaeeaBBBaBaaBBeaa ,., 



. . .... -iLEi-j7e3688i£l ' TiJ7EFE8BS!) 

icE5C-sii4aaaf(7Erjsa7EiaoiFea8r5ci 



inowM i , eubK368Di;ia37Cr"E 



'333 *SiioFaiiB7cre 

333333333*444.44**4*4144*414***** *'"}i^25 1 * ' Ere * 
ii i 111' ""S55SE 

........... .... 



88356885099999999999999999999999 



.- CC8F* 13683235376 



"■E36BBE:.. . 

19B3anBC*BE0BiaO78BlC93eOBCDDB41 
:■;;"<: £3FE76CBFE8SC9rEB*28**F3C0 



FD43F13BBB2RBC40' 
17 REH 

■..,',..■■.:■ ■■■■ \ij 5535553 48FEeF3aa73Hai*BFE 

33333333344444444**4****4444*1** -yCSYrSSSf-fCSiiiK? 

\ al.'i-j'j^b-f.-E-r - ; :■: .\v,(: -:.;::,.■ iS-'i.i.-iSv-ja&li 
66666S66677777777777777777777777 



1 i. ■ ■ : :■.■.■,:.■ 

;. ■• :; -.^ ;.;.'•:.:•:■..;. ■:-.ia09363ic9[>s3c3a7c 

!..U»'BiaiiaiBBR7EDBi' 

"■e;.-;.f if o>-iSii i s:v26r!w.:^3c. ?.«-.?.. ■ 

192B7EElFeaBSB21" 

1"R7E0327E 19FE0fia« 



ooaeoeeaBini: 

limiiii? 

iss^s-aaaa ::■::::. :■:■, .-:.:■ \i;v\: ,.;../.-■;. 

: ff: 333344444*****44444****44** 

<■;:;<■•; '.- '^^5555355 

5E5555S55te&66666666666B66666666 

■'7777777?? 

-■: 7-7-7 7s8BBoseeasBeseflaMaaB» 

88398888899999339999999999999999 



eBaaa*FE3*aBiaii2iB0H7EDEa7Ei9FE 

BfiiOB338BHC33500- 



.■■c9a3?eaBFE76C8 



7B4BCB77aaiB36eea33BBBC93R7B*8CB 
'.':.■.- 'L)'i01srB36Ba3fi7B4aCBB73a7B4e 
l8C63E0BCDDB41C3I12ieeR7ED527E19 
rE31F5CCDE44E128- 

*"B9reSBC3FEBB2B12 



LION 

Des lions encages 
Revaient de liberie 
Mais deux gardiens zeles 
Sur leur prison veillaient 

Emmanuel LECHARNY. 
Mode d'emploi: 
Deux gardiens de zoo ortt la tache plutot dangeureuse dempecher ___ 

de 2 ou 3 lions. Apres apparition du LOGO, attendre le Soyez attentif aux DATA, chaque virgute 




>3193SaB3fl7 



CANON 



message JEU: A'B. Jeu A : 2 lions et Jeu B: 3 lions. 

Replacement du gardien de gauche : 

Q pour monter et A pour descendre. 

Deplacemertt du gardien de droite : 

[pour monter et ] pour descendre 

Le score 200 et 500 atteinl vous octrote une vie (maximum 4 vies). 

La partie MACHINE de ce programme lui assure une certaine rapi- 

dite. La vilesse du jeu. ralentie au debul, augmenle en fonction du 




C'est nouveau, ca vient de sortir 



BIDOUILLE GRENOUILLE 



Special Bondage 

Ca y est, on se fait engueuler 
par (e redacchef sous pretexte 
qu'on ne foul rien C'est vrai 
ma is c est pas une raison pour 
gueuler j a- quand meme ecm 
deux titres. aurourd hui I El des 
bons. pas "void une information" 
o.i 'voila une nouvelie" Jai 
Ctee J ai sue sang et eau. II ne 
manque plus que les articles qur 
von! dessous et ie tour est joue 
Eh bien non. faut qo'il gueule. 
Ca fail rien. \e vai& le calmer, je 
vais lui tiler un peht bidouiiie 
grenouille et je serai Iranquille 
pour les quinze rours qui vien- 
nent. 

J ai rien a (aire, en plus : j ouvre 
oisivemenl des erweioppes, je 
recopie quasiment texluellemenl 
ce qui est inscrit. je me de- 
brouille pour placer le nom de 
I'auteur et emballez c'est pese. 
Un exemple au hasard : Le 
jeune Pascal Monnier m'envoie 
un moyen de trouver rapidement 
I'aigle d'or dans, justement. I'Ai- 
gle d'or pour Oric. Qu'est-ce que 
je fais ? Je trouve un pretexte. 
futile bien sou vent, je tourne ma 
mayonnaise et je sers chaud. 
Oui, de la mayonnaise chaude, 
ne vous deplaise. Dans ce cas. 
je vais prendre un ton syntheti- 
que mora I isle, ga donnera un 
true du style : 

"II est des choses qu'on ne doit 
pas faire. Tricher durant le de- 
roulemenl dun jeu informatique 
est lune de ces choses. Malgre 
eel a, un individu nom me Mon- 
nier trouve le moyen de nous 
narguer en etalanl aux yeux de 
tous la facon qui) a trouvee de 
detourner le jeu Regardez ces 
preuves '" 




"Rentrer dans le chateau. Faire 
un demi-lour pour se mettre 
face a la porte. Essayer d'avan- 
cer en pressanl sur la Heche du 
haul jusqu'a ce que Ton entende 
un bruit Fairo en suite un quart 
de tour a droile. de facon a etre 
place 'ace a la gauche de 
i'ecran el appuyer su' la lettre 
O On se relrouue dans les ca- 
tacombes La. avancer |usqua 
la porte. se mettre face a elle et 
appuyer sur la Heche de gau- 
che, toujours jusquau bruit I il 
fectuer le memo quart de tour 
appuyer sur O et on se trouve 
au sommet du donion. On pent 
alors prendre i Agie dor. apres 
avoir pns la precaution de pren- 
dre I'aigle en piomb Ce true 
permet de passer d une porte a 
('autre sans lomber dans une 
oubliette, ou de revenir en arrie- 
re si une grille bloque le pas- 
sage.' 

El voila, (affaire est taite. jai 
reussi a caser une solution. Un 
true technique ? Pas de pro- 
blems On change de ton. on 
passe au polar. Let's go : 
"Avoue. salopard ! Comment 
t appelles-tu ? 

-Roland Raynier, M'sieu I'ins- 
pecteur. Mais jai rien fait I 
-T'as rien fait, mon oeii | Tu vas 

Suit la description detail lee de 
I'interrogatoire. jusqu'a ce que le 
suspect craque : 

"Oui. j'avoue. voila comment j'ai 
reussi a sauvegarder sur dis- 
quette sur Vic 20 ou CBM 64 un 
programme en langage machine 
dont je connaissais les adresses 
de debut et de fin. 

10 INPUT -ADRESSE DEBUT":D 
20 INPUT "ADRESSE FIN":F 
30 H= INT(D/256) 1= D-256* H 
40 OPEN 1.8.1,"NOM DU PROG" 
50 PRINT* 1.CHRS (L):CHR$ (H) 
60 FOR 1= D TO F 
70 X= PEEK(I) 
80 PRINT # l.CHRS (X); 
90 NEXT I :CLOSE 1 

Mais j'vous jure que je savais 
pas, M'sieu linspecteur ! M 
La, je peux meme me debrouil- 
let pour que Tin spec teur trouve 
le complice, le ramene et lui 
fasse avouer autre chose. 
Comme on est dans le commo- 
dore, on y reste : 
"Allez. ton copain a crache le 
morceau ! Tu peux le dire. 



1541 

-Oui. j'avoue. apres avoir charge 
un logiciel il suffit de relier entre 
eux deux des trous de la prise 
din qui est directement au- 
dessus du fusible a larriere. 
Tenez, tout est latoue sur mon 
bras." 

Et pat ! Je place le schema en 
question. 




Comme cela necessite un bein 
d'exptications. je les donne en- 

"Mais tu mens, salopard ! Re- 
garde, quand on fait ca. I'ecran 
revient a I'image de presenta- 
tion I 

-Bien sur. ma is le programme 
est toujours en memoire. mon- 
sieur I'inspecteur !" 
Comme sur des roulettes. 
Je peux donner dans le sensa- 
tionnel. aussi. 

"Jacques et Brigitte se SE PA- 
RENT t Le DRAME I Elle decou- 
vre avec HORREUR que son 
amant est un feru d'informali- 
que. c'est la RUPTURE ! Voir 
page 17." 
Petit tour page 17 : 
"Lots dune absence inopmee de 
son amant. Maxime Burzlaff. elle 
foui'le ses poches et trouve le 
document ci-dessous. 
Manic- Miner pour CBM t>4 : 
charger la premiere partie. etein- 
dre et rallumer I'ordinateur. Puts, 
faire LOAD"". 1.1 et POKE 
16419. numero de i'ecran entre 
el 19 et POKE 16424. nombre 
de vies. 

Ghosbuslers : lorsque la PLC 
energy est autour de 5000. ap- 
puyer sur B en continu car le 
Mars hm allow man peut 



se former. Pour 
entrer dans Zuul : mettre le 
ghostbuster en face de la porte 
au centre el quand le Marsh mal- 
low man revient de la droite, en- 

Saisie par le doute. elle decide 
alors de le faire suivre. C'est au 
cours dune explication ora- 
geuse que le drame surviendra : 
elle saisit un pied-de-biche 
quelle etail en train de net- 
toy er..." 

Vient ensuite la description du 
meurtre. sur le mode le plus 
atrace et le plus sanglant possi- 
ble. II y a des ficelles, des trues 
conn us dans la profession pour 
leur impact : de meme qu'un 
ethnologue est toujours distin- 
gue et un professeur severe 
mais juste, un meurtre doit etre 
sanglant. le sang doit jaillir a 
flots et si possible la lingerie in- 
time doit patir dans la bagarre. 
Ce dernier detail, sur tout, est 
important : c'est lui qui cree ce 
que Ion appelle "I'accroctie". 
One accroche, c'est un detail qui 
doit donner envie de lire I'article. 
Par exemple, je peux ecrire en 
Ires gros titre : "Gagnez des mil- 
liards avec voire minilel j", Bien 
sur, tout ceux qui ont des mini- 
tels vont se precipiter sur radi- 
cle pour decouvrir (mais Irop 
lard) que le seul moyen de ga- 
gner des milliards, c'est de ne 
PAS I'utiliser. 

A moins de... (et hop. je place 
Maigret) bon sang, mais c'est 
bien sur I II suffit d'appeler des 
serveurs qui ne passenl pas par 
('organisation malefique denom- 
mee Transpac" ! II y a Micro 
kids au 889 96 98, le Club des 
Chiens au 380 37 37, un ser- 
veur etrange au 968 32 59 dans 
lequel on peut appeler des choix 
non proposes au sommaire. ou 
le nouveau serve ur de Space - 
com au 16 37 82 40 18. C'etait 
('evidence ! Comment n'y ai-je 
pas pense plus tot ? Allez, em- 
barquez-mci tout ce jolr monde. 
C'est vraiment pas difficile. Bon. 
ie vais filer pa au redacchef, 
histoire de calmer ses angoisses 
et je pars quinze jours aux Ba- 
hamas. Salut. 

NDFTC : Ca passe parce qu'on 
est. encore une tois. a la 
bourre! Mais la semaine pro- 
chaine : Tintin ! El pour les Ba- 
hamas : Mitou ! 



ET HOP ! UN DE PLUS... 

Et c'est Mitsubishi qui s'y ^ -, 

colle '. Plus standard que ses 1 H^K ~i ' 


Pour lun (le ML-F 80) vous 
disposez de 64 Ko de ram et 
pour ('autre (le ML-F 48) rien 


YSBsSr" 


que 32 Ko de ram. sinon I 
toules les caracteristiques sonl | 
identiques aux predecesseurs : 
32 Ko de rom. deux ports car- 
touches, deux entrees joys- p 
ticks, un ecran de 24 lignes i 
sur 40 colonnes (soil 256 n 
points sur 192 en haute resolu- u 
tion). sonorisation sur trois a 
voies el huit octaves... Enfin. L 
vous connaissez la musique ! c 
Ators qu'a-t-il de plus ? Un ex- v 
cellent manuel de mise en c 
route comptant un peu plus de r. 
trois cents pages, des exem- e 
pies a lire-larigot.et des idees c 
sur le lonctionnemenl du basic n 
MSX el du langage machine du s 
Z80. II se vend avec trois logi- a 
ciels dont deux de jeu et un de C 
demonstration des capaciles b 
de la bete en basic. Les seuis v 
peripheriques actuellemenl r 


A MSX Mitsubishi 

roposes conjointement son! 
s joysticks, mais une impri- 
ante. un magnetophone et 
n lecteur de disquelles sont 
nnonces pour le futur proche. 
b 64 Ko coulera un peu plus 
9 3000 (rancs et le 32 Ko en- 
ron 2600 francs. Comme 
habitude, on peut etre surpris 
s la difference de prix ridicule 
lire les deux modeles. sa- 
lant qu'une extension me- 
oire de 32 Ko enfichabte 
;ra vendue pour le ML-F 48 
jx alentours de 800 francs, 
one si vous voulez un Mitsu- 
sni prenez le plus gros. il 
jus reviendra moins cher que 



L'EFFACEUR FOU 
A FRAPPE ! 



Tout le monde se souvienl de 
Yuri Geller, I inelfabte medium 
qui fait se lordre de fire les pe- 
lites cuillers Jugeanl sans 
doute que son numero 
commencait a sentir le ranee, 
le demode, le deja-vu et qu en 
un mot lout le monde sen fou- 
lait, le jeune Yuri a trouve 
mieux. Dans les bureaux de la 
sociele Wang a Hounslow en 
Angleterre. il a reussi a ellacer 
entieremenl le contenu d une 
disquetle par simple imposition 
des mains. Les lemoins pre- 



sents ont a Hi une que la dis- 
quetle fonctionnait parfaite- 
menl AVANT et plus du tout 




APRES. Je pose la question 
suivanle : ont-ils verifie si le 
drive etail bien branche ?? 



TOPVIEW 



Apres OPEN.SYMPHONIE. 
JAZZ, c'est au tour d'IBM de 
se lancer dans ledition de 
softs de haul niveau. La 
compagnie Yankee va bienlo! 
sortir un logiciel baptise TOP- 
VIEW Celui-civiendrapuer des 
coudes pour ecarter ses 
concurrents II sera en ellel 
susceptible de per mettre a 
lutilisateur polentiel de travail 



ler avec plusieurs ecrans. plu- 




grammes. Ca me rappefle 
vaguement Macintosh, mais ie 
dois me tromper. 



ET UN ARTICLE SUR 
SINCLAIR, UN ! 



Involonlairemenl. Sir Clive 
nous donne des scoops 
Quand nous avons anno nee 
les recherches qu il edectuait 
sur les memoires de masse et 
son nouvel ordinateur portable. 
ce nelail pas offrciel C'est 
maintenant confirme ; il y tra- 
vaille dur 

Regardez sa photo Derriere 
ce 'ronl olympien se dissimule 
une volonte de ler Sa ma- 
chine ne sera pas un compro- 
mis. a linverse des portables 
qui existent a I heure acluelle. 
Mais tout ca. vous laviez deja 
dil dans voire dermere conle- 
rence de presse Alors. ou esl 
la c--onlirmal<on "? Quel elemeni 



apporter ? Ce portable sera la 
meilleure mactime qui soil " 




Bon. ben cetait pas la peine 
de nous derange r pour rend re 
publics les coups dans les 
ch evil les que vous vous en- 



VIRGIN : 
DES BEAUX ET DES LAIDS ! 



La nouvelie gamme de pro- 
ducts de Virgin a ete presentee 
recemmen! a Londres lors du 
LET. Rien de bien extraordi- 
naire n est apparu. mais quatre 
titres sont a retenir et ce a 
divers titres (hum). 
Terrorist tourne sur C64 et a 
ete programme par les auleurs 
(hongrois) de Chinese Juggler. 
Le graphisme en trois dimen- 
sions vaut un coup d'oeil. mais 
laclion se Iraine: un comble 
pour des terroristes. non ? 
Tout se deroule a partir de 
votre helicoptere. charge de la 
surveillance d'un terriloire 
aussi vaste que Versailles el 
Azay-le-Rtdeau reunis. Bref. 
heureusement que le bruit des 
pales est realiste ! 
Strangeloop vous entrarne. a 
bord de voire Spectrum, dans 
une usine de robots oil ceux-ci 
(les horribles) viennent de se 
revolter. Miraculeusemenl. 

vous etes le dernier cri dans le 
domaine de la manipulation 
genelique: fils de Batman et de 
Wonderwoman. vous serez 
presque suffisamment puissan' 
pour remettre ces boites de 
"intelligenles" dans 
chemin. Graphismes 



exceitents et petits gags vous 
remonteront le moral apres 
cinq mille tentatives inlruclueu- 





Sorcery est lui aussi destine 
au Commodore. Pas de pro- 
blemes. le programme nest ni 
original, m bien realise, ni rnte- 
ressant Seuis des dessms a la 
hauteur sauvent le logiciel des 
oubliettes En gros vous gentil. 
neeromancien mechant. vous 
vous battre avec araignees et 
autre s dragons, vous perdre 
beaucoup de vies et de temps. 
lui (lauteur) rigoler et empo- 
cher royalties 

Falcon Patrol II est le digne 
successeur de Falcon Patrol. 
Pour ceux qui aiment. lis y 
trouveront des drfficultes cent 
tois superieurGs au premrer 
Pour ceux qui ne connaissent 
pas. piiole dun chasseur de 
grande classe. vous devez de- 
fendre une vilte belle et isoiee 
en ptem desert sans oubNer de 
vous reapprovisionner en car- 
bur ant el missiles de temps en 
temps Bon grapbisme en trois 
t! ■••••■•: i ■<■ et sononsation 
meilleure que dans la premiere 
du jeu. 



GRAND PRIX 



II ne sagit pas dun nouveau 
jeu ave les manetles et les voi- 
lures de course sur I'ecran. Le 
Grand Prix en question est 
celui qui a ete decerne aux 
meilleurs ouvrages de littera- 
ture informatique. Dans le do- 
maine grand public, c est Stella 
el Joel de Rosnay qui lont em- 
porte. Faut dire que leur bou- 
quin est lellement grand public 
qu'il a OUblie d etre interessant 
Cole ouvrages techniques. 
Chantal et Patrice Richard on 
ete recompenses pour leur 
livre "Program ma tique" publie 
chez Belin. N'oubliez pas de 
nous envoyer un exemplaire 
en service de presse. pour 
qu'on dise ce qu'on en pense. 
Pour respecter la tradition. 



Alain Drozd. createur du prix et 
patron d' Inter national Compu- 
ter a annonce les resultats a 
Tissue dune grande bouffe 
chez Josephine. Doit se pren- 
dre pour Herve Bazin cui-la... 




ILS N'ONT PAS D'IMAGINATION 



II y a deux semaines s est tenu 
dans un o'gnd holel londonien 
le 01 Sliciv. qui elait consacre 
au OL. dou le titre. De nom- 
breux nouveaux logiciels y 




etaieni presenles. nolammenl 
OL Pascal, qui est pour le OL. 
dou le lilre. OL Forth, qui est 



pour QL. dou le litre, QL Moni- 
tor, qui est pour QL. dou le 
titre. QL Assembler, qui est 
pour QL. dou le litre et QL Ty- 
ping Tutor qui lur aussi est 
pour OL doU le litre Un pro- 
gramme gtaphique lit sensa- 
tion, je vous donne son nom 
en mille. Solution ta semaine 
prochaine Peu de ieux un 
Backgammun (oin. vous avez 
devme) el un Super Backgam- 
mon (dont le vrai litre esl. 
bon daccordi sont les seuies 
nouveautes. Vous avez "Mere! 
a aimer le Backgammon. 
Cole hard, de vrais drives ont 
ete montres par plein de fabri- 
cants. c'est dommage qu'ils ne 
se soient pas mis d accord sur 
un standard avant Et sur un 
nom. parce que vous allez 
rire... Ok. vous avez compris. 
Micro Peripherals a expose 
une imprimante a laser. Hem ? 
Non. jai rien dit. 



C'est nouveau, $a vient de sortir 



J'AI ENVIE DE DIRE 
DU MAL DE QUELQU'UN. 



Et c'est Loriciels que je bom- 
barde ! Eh oui. y a pas de rai- 
son que je les taisse tranquil- 
les. Jusqu'a pas plus- tard 
qu'aujouro'hui. personne 

n'avait dit du mal de leurs pro- 
duits. Eh bien c'est tint, na ! 

Commencons paf Vega pour 
le Commodore 64. Si Ton peut 
admirer le graph is me seme 
deci-dela de quelques gags 
bien sentis et la musique pas 
trop ringarde. on peut aussi 
admirer a quel point le sujei 
est original : Vega c'est ni plus 
ni moins qu'un Moon Palro! 
revu et corrige. Berk I Deja 
que le premier n'etait pas ge- 
nial, le remake est encore plus 
chiant. 

Pour Oric nous avons droit au 
Relour du Docleur Genius. Au- 
trement dtt. c'est comme au ci- 
nema : quand le premier mar- 
che. on lait un deuxieme puis 
un troisieme puis un quatrieme 
episode. En general ga ne va 
pas plus loin tenement c'est 
mauvais a ce stade. Ce 
comportement s'appelle "epui- 
ser le filon". Ce nest qu'une 
preuve supplemental re du 
manque total d'imaginalion de 
ta plupart des auteurs de logi- 
ciels (que ce soil en Fiance ou 
a t'etranger). Berk, berk, berk ! 

Retour au Commodore 64 
avec Infernal Runner D'apres 
tous les gens de Loriciels. ce 
produit doit detroner Lode 
Runner. Le fait est que ('ani- 
mation est com bi nee a des 
decors sympathiques, le tout 



VEGA 




melodique 
beethovenienne. Alors que 
vais-je trouver a lui reprocher ? 
D'abord, c'est pas un jeu. c'est 
un film d'horreur ou les pieges 
se succedent au rythme des 
demis devant Pepe Louis En- 
suite j'aime pas les jeux ou 10 
dois passer plus de cinquanie 
sept heures pour vaincre le 
premier niveau i lorsqu'il est 
trop dur. un jeu perd de son in- 
teret rapidement. Entin ce qui 
est dramatique. c'est que per- 
sonne ne semble avoir comprts 
pourquoi Lode Runner est ge- 
nial. Moi, je vais vous donner 
mon avis : si L.R est unique et 
inimitable, c'est grace a sa 
simplicity fondamentate qui 
permet la construction de ta- 
bleaux infernaux ou evidents. 
Si les concepteurs de softs 
comprenaient cela, ca leur evi- 
terait de se vanler inutilement. 



MSX ? He mais si ! 



Le fera ? Le fera pas ? La ri- 
sette aux japonais ? On dit que 
Philips devrait presenter bien- 




tot deux nouveaux micro-ordi- 
nateurs compatibles avec le 
standard MSX et dont les prix 
ne depasseraient pas la barre 
des 5000 balles. Depechez- 
vous. on veut les voir. Nous 
sommes curieux a Hebdogiciel. 
Des negociations seraient en 
cours avec VIFI Nathan qui a 
lui meme passe recemment un 
accord pour la distribution de 
logiciels au Japan. La boucle 
serait-elle en train de se bou- 



RACINES 



II existe une passionnante po- 
lemique autour de la question 
suivante : qui a commercialise 
le premier micro- ordinateur ??? 




Contrairement a ce que Ion 
pourrait penser, il ne s'agirail 
pas d'Apple. En effet, un an 
avant que les deux maniaques 



du (er a souder ne s'enfer- 
ment pour un douloureux ac- 
couchement dans un garage 
californien, un autre bidouilleur 
fou avail deja mis au point sa 
propre machine. II s'agissail 
d'Edouard Roberts, qui . en 
1975 a Albuquerque, crea I'AI- 
tair. A cette epoque Roberts 
travailla avec Bill Gates qui 
ecrivit sa premiere version du 
Basic pour I' Altai if. Depuis Bill 
Gates est devenu le patron de 
Microsoft. Quand a Edouard 
Roberts, apres un succes rela- 
tif de I'Altair. il a vendu sa so- 
ciete pour s'acheter une ferme 
pres de Macon. Pas le Macon 
du pinard, mais la ville de 
Georgie. C'est beau de retrou- 
ver ses racines I 



LA BANDE DES CCEURS ESSEULES 
DU SERGENT POIVRE 



Les fans des Beatles pourront 
bientot acquerir un jeu d aven- 
ture base sur les chansons de 
leurs idoles. But du jeu: etu- 
diant en mythologie, vous 
devez retracer en detail la vie 
des 4 de Liverpool en collec- 
tant un certain nombre d'objets 
et en vous aidant des paroles 
de leurs chansons. On ne sail 
pas si John Lennon est d'ac- 
cord, a cause qu'il est mort 
comme d'habitude. mais Paul 
McCartney est ravi qu'on parte 



de lui, comme d'habitude. Les 
autres ne disent hen. comme 
d'habitude. Pour CBM 64. 
Spectrum et Amstrad. chez 
Number Nine (tiens ?). 




ET HOP ! 
ENCORE UN DE PLUS... 



Comme pour chaque fabricant 
de MSX, Toshiba s'est pose le 
problem e de I 'argument mas- 
sue qui lui permettrait de 
conquerir plus que sa part po- 
tentielle de gateau. Le HX-10 
est rigoureusement identique a 
tous les autres micros de ia 
serie MSX. il n'offre presque 
rien de plus (par rapport au 
standard) mis a part une ga- 
ranlie de trois ans et un 
connecteur cinquante broches 
autorisant le branchement d*un 
magnetoscope ou d'un disque 
video ou d'un autre micro (par 
exemple). II se situe dans une 
excellente gamme de prix puis- 
qu'il coutera a peine 2600 
francs pour 64 Ko de ram et 
un clavier de machine k ecrire 
protessionnel. 

Dernier aspect positif de la dif- 
fusion Toshiba, un hit-parade 
des logiciels MSX sera tenu 




par limportateur anglais, avec 
une distribution des litres se- 
lection nes a un prix defiant 
toute concurrence. Sou hai tons 
que t'homologue frangais i mi- 
te ra son collegue anglais ! 
Les joysticks sont d'ores et 
deja disponibles el une impn- 
mante a stylos (la HX-P570) 
d'une capacite de cent cinq ca- 
racteres par seconde (texte ou 
graphique sur papier en feuille 
a feuille ou en rouleau) est an- 
noncee pour les 
venir. 



L'HHHHEDO : TOUT FAUX ! 



Pour le coup, on a tout faux 
nous aussi. Deja, nous pen- 
sions que Thomson avail fait 
une proposition de rachat a 
ladminislrateur judiciaire d'Oric 
Angleterre. mais nous nous 
Irompions : selon le service de 
presse. Mister Cross ne s'est 
pas rendu au siege de Thom- 
son en France il y a deux se- 
maines et il n'a jamais ete 
question d'aucune proposition 
quelle quelle soil. Nous avons 

En plus, la conference de 
presse don nee a Las Vegas a 
I' occasion du dernier Consu- 
mer Electronic show des mem- 
bres de Thomson et dont nous 
avions rendu compte n'a fina- 
lement pas ete don nee. Nous 
avions (deja) des visions. 
Et une derniere baffe pour 



nous : le TO 9 n'exisle pas. 
Les annonces qui en onl ete 
faites son! des hallucinations 




collectives d 


nt nc 


us avons 


ete vi dimes : 




avons lan- 


tasme. 






Dis done. Thomsor 


tu serais 


pas un peu e 


l train 


d insinuer 



REMETTEZ VOS LUNETTES DE 
SOLEIL, DIEU EST REVENU ! 



Les petit s doigts de magiciens 
de certains de nos pirates bien 
de cheu nous ont re pond u a 
mon appel: ils vous off rent (a 
vous possesseurs d'Apple ) de 
beneficier de lediteur de ta- 
bleaux de Lode Runner pour 
Championship Lode Runner. 
Les conditions a remptir pour 



realiser cet exploit sont les sui- 
vantes: posseder una version 
deplombee de chacun des 
deux logiciels. un exemplaire 
de Diskfixer et d'un copieur 
(Locksmith par exemple) et 
en fin deux drives. 

1. realisez une copie de L.R. 
avec voire copieur. 

2. chargez Diskfixer. 

3. placez L.R.C. dans le drive 
t et la copie de L.R. dans le 
drive 2. 

4. lire la piste # 03 secteur # 
00 de L.R.C, pressez "E" et re- 
pondre "Y" pour transferer ce 



secteur vers le drive 2. 
5. recommencez Idperation 4 
en changeant de secteur grace 
a la touche "->" et ce pour les 
cinquante tableaux de L.R.C. 
(soil cinquante secteurs). 

Une tots celte serie de trans- 
ferts realises, placez la dis- 



quelle L.R. dans le drive 1 et 
bootez. Vous avez dorenavant 
acces aux commandes "CTRL 
E", "E", "P"... propres a ledi- 
feur de L.R.. mais cette fois, 
va's agissez sur les tableaux 
de L.R.C. 

Cette methode nous a ete of- 
ferte par Apple Star System 
Crack Band, aides par Disk- 
busters, que nous remercions. 
A la prochaine pour d'autres 
bons conseils I 



Scratch TRACK 



ALLO? 
LES NOUVEAUX OCEAN., 



Presentes lors du LET (Leisure 
Electronics Trader) de Lon- 
dres, les nouveaux logiciels 
d'Ocean oscillent entre crea- 
tion geniale et remake nullos. 




du jeu n'a pas pour autant pro- 
gresse. Etonnant non ? 
En revanche, un renouveau du 
jeu d'aventures (deja amorce 
avec Swords and Sorcery de 
PSS) semble en cours. Ocean 
lance, pour le Spectrum, Gift 
From The Gods , un melange 
de jeu d'arcade et d'aventure 
dirige par joystick avec anima- 
tion... 

Un bon point pour cette so- 
ciete qui s'elait jusqu'a present 
canton nee dans I 'arcade rin- 
garde. 



Non content de nous avoir 
soutes avec un mauvais pom- 
page de Donkey Kong, les in- 
formaticiens d'Ocean lance le 
retour de Kong dans Kong 
Strikes Back ! (Commodore 
64 et Spectrum). Laction se 
situe dans un Luna-Park, a la 
place du tradilionnei immeuble 
en construction, mais I'interet 




V.P.I. FAIT TOUT DANS LA MAIS0N DU SOL AU PLAFOND 



Le catalogue de cette emi- 
nente societe californienne 
vaul plus d'une remarque. il 
necessite un detour plus une 
pause cafe. Video Peripherals 
Incorporated commenca sa 
brillante carriere en fabriquant 
tous tes cables possibles et 
imaginables. Tout d'abord spe- 
cialisee dans la video, la mai- 
son (ran chit une nouvelle 
etape en s'aftaquant, tous fils 
de cuivre dehors, a la micro-in- 
form at ique. 

Joysticks Poids Lourds 

Le joystick le plus mahousse 
du marche, c est VPI. Son petit 
nom: High Score (tout un pro- 
gramme). Son territoire; I'Apple 
(modele HS 30) e! I'ensemble 
des compatibles Atari (le HS 
15). Ils vous invitent (HS 15 el 
HS 30) sur la table dans des 
conditions similaires au cafe. 
Les deux modeles sont "swit- 
chables" en position droitier ou 
gaucher. Les deux ont une 
manette a durete reglable au 
goOt du joueur. Les deux dis- 
pose nt de deux boutons de 
feu: I'un sur la poignee, I' autre 
eloigne d'une dizaine de centi- 
metres sur la droile ou la gau- 
che du joystick. Vous benefi- 
ciez ainsi d'un contort el d'une 
rapidite sans egal. De plus les 
deux sont testes pour ne pas 
quitter la table au moment le 
plus tragique. Le HS 15 gagne 
un aulofire, avec potenliometre 
pour regler la vitesse de feu. 
Le HS 30 n'a qu'une diode 
rouge (contre la verte du HS 
15) pour se consoler. 




deux lave-vaisselles et un 
raton-laveur (pour les particu- 
liers surinformatises). En 
France, on sait tenir un fer a 
souder. et on les fabrique soi- 
meme. 

D' autre part, pour les bou bou - 
les en plastique, ca roule 
(celles qui vont se loger au 
bout des joysticks). Vous vou- 
lez brancher votre poignee 
Atari sur un Apple: pas de ma- 
laise ga existe, le HSA 135 tra- 
verse I 'All antique cette annee 
et votre Apple pourra done re- 
cevoir deux joysticks de type 
Atari, mais pour les deux bou- 
tons de feu independents vous 
repasserez ! 



Ca c'est du bon produit, par 
definition, mais pour ce qui est 
du mauvais gout VPI en 
connait un brin. Admirez la col- 
lection Printemps-Ete 65 de 
notre heroine... 



VPI veut sans doule se poser 
comme la champion ne toute s 
categories des raccords bizar- 
roides et des gadgets inutiles. 
Tous les cables multi-joueurs. 
multi-adaptateurs, multi-ordina- 
teurs y passent: Din 5 bro- 
ches-4 jacks (connection du 
magneto au micro), prises te!e- 
phoniques multiples (pour 
brancher plusieurs modems), 
prises deux jacks deux 
modems deux ordinateurs 




truands. Reste done a s'occu- 
per des multiples person nes 
qui se sentenl menacees par 
I'ombre de ces personnes mal- 
faisanles. VPI la fait en ces 
termes: 

Paranoiques ecoutez-moi 

VPI la tres celebre vous aide. 
De vi lain & espions piratent 
votre ligne telephonique et 
branch ent un magnetophone 
pour enregistrer tout ce que 
vous raconlez a votre petit (e) 
ami (e). Vous n'osez plus 
Iransmettre (par modem) un 
programme a votre meilleur 
copain de peur que ces horri- 
bles personnages ne I'enregis- 
trent et le vendent sous leur 
nom. La solution, la voici: la 
VPI 145 detecte la presence 
de tout branchement illegal sur 
votre ligne PTT personnel I e. 
Vous pouvez maintenant tele- 
phoner ou modemer en toute 
quietude grace a VPI. 




Allez-y maintenant bande 
Mais ce n est pas tout 1 Vous galopins I Piratez Minitel i 
savez que I'informatique, c'est toute impunite (pour 30 $ envi- 
le royaume des pirates et des roni. 



HIPPO 
JOYST 

Cast toujoun japonais. c'est 
toujour;; costaud, mate, an 
plus, gs a un autofire. Cast a 
dire qua, al vous lalssez un da 
voa dolgts appuye aur un das 
boutona, la tir sera a repeti- 
tion, c'est paa beau ca 7 Pour 
le raata nan da change : trots 
boutona da tir, una bonne 
prise an main at quatre van- 
louses pour la collar deflnlti- 
vamant sur Is table da la sails 
a manger (super-pratique pour 
las rapes!) Prise standard 
pour Amatrad, Atari, Commo- 
dore 64, ktSX, Vic 20. Compa- 
Oric 



nouveau, 
j tir automatique 

at Spectrum. Pour Apple, 
Thomson, Texas, Macbbro at 
Trucmuche, Tlntln : ca ne 
marche pas ou alors II taudra 
bldoulller. 

Ah, au fait, c'aat plus char 
qua I'anclen, 120 bailee I De 
toute lagans, de I'anclen II n'y 
an a plus, alors.... 
Cast bon, c'aat pas trop 
cher ? Envoyer voa sous 
apres avoir rampll le bon da 
commando cl-jolnt. Le mlnls- 
tre du commerce exterieur du 
Japon vot 




•it-it-ir-A-ti-tr-tr-tr-Atr ■&&■&•&■& 
Bon de commande a decouper et a renvoyer a 
SHIFT EDITIONS, 27 rue du General Foy 75008 
PARIS. 



PU=120F...x„.= _.F 

frais d'envoi = +1SF 
cheque joint: TOTAL = ...F 



HEBDOGICIEL SOFTWARE 

Le logiciel a sa juste valeur 

Les nouvelles boites jaunes sont arrivSes ! Six logiciels francais de qualite par cassette et un prix raisonnable : des 
produits signes SHIFT EDITIONS ! 




Unjeud'avenlureicavaSix jeuxd'aventure, boniourlesnuitsbl 

iKdevenirtouratourexplorateur.espioaegyptologue,! 

rose! vie timeduceiebredocteurParanaud.Sivousarhvezau bouidecessixcas- 

se-Iete sans probiemes de sante et sans troubles mentaux. vous deviendrez 

iteste un des grands maTtres mondiaux du jeu d'aventure ! Une cassette 

craquer pour 130 francs. 






c utilise le langagemachine pour r^tiechir et vou 

a votie cerveau humain pour le battre au Morpio 
plus lacile ; cinq Stages, des trappespartout et si 

Dans "OiMeak". vous devez reparerunevoitureau beau milieu degran- 
iques d'huile. Les gouffres, les ravins et les precipices de*Pont-ievis" vont 
endre (ou ! Le "Parsec" lonce a toute vilesse et la "Guerre nucleaire' est w^ 
mptement le premier grand Wargame pour One 120 francs la cassette ^P' 



pour Tl 99: voire h 
cuperer des fragments de crista I dans 
le labyrinthe qui est le lieu a la mode 
pour lous les monstres branches de la 
galaxie ! Les autres jeux sont tout aus- 
si efficaces : unsuperbesauteursursa 
pyramide, un duel pour deux joueurs 



dans une jungle hostile i 
tueux tableaux. 120 Ira 
en basic etendu. 



it -Mis- 
transport era 
ldauxsomp- 



BASIC ETENDU 



TJ-9&4A N'4 




SpKKong 

4 I SPECTRUM N" 1 





agogoichangezle 
t a Pea ri Harbour, gui- 
dez Al'bert el Kong dans leurpyramide 
favorite, jouez h un jeu de balle en- 



chanlier et regal ez-vi 



! Six super-program- 



reflexion avec "Puzzle'' el la slategie 
avec "Minsur" oil vouspourrezorgeni- 
ser des competitions jusqu'a 5 



d'or". un fabuleux jeu graphique en 3 
dimensions. 6 super-programmes 
pour 1 20 francs. 



twBBBnwiim! 

-■ xtf '::■.>:■■ 



Des jeux, de I'eleclricite el du plaisir. 
voilfidequoifairefretillerles Electrons 
dans votre M05 et quand en plus ces 
jeux son! multiples el douzevousenvi- 
sagerez quetques nuits blanches 
d'Olhelto. de Poker, de Memo 7... Des 
que I'immobilile vous paraTtra insup- 
portable, partez pour I'espace pro- 
fond {Worp)ou retrouvezvos amis (fi- 
chier d'adresse}. Vous verrez. vous 
n'en crolrez pas plus vos yeux que vo- 
ire M05 n'en croira ses jeux ! 

*********** 
A BON DE COMMANDE A REN- 

* VOYER A SHIFT EDITIONS, 27 

* me du Gal Foy 75008 PARIS. 



* ORICN°4 D 120F. 
jt OHICN°5 □ 120F. 
m SPECTRUM N°1 D 120F. 

* TEXAS N° 4 O 120F 
^ ZXB1N°1 □ 120F. 

* M05N°1 150F, 
* 

j(. - REGLEMENT JOINT -_.00F 



DEUX SUPER-CONCOURS PERMANENTS 

20 000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE pour 2 
personnes en CALIFORNIE au meilleur logiciel du TRIMESTRE. 



Un contours de plus! 
Rion de Men original dans 
cette fonrmle. pourtant nous 
essay MM de (aire quel que 
Chose de differ en!: nous orga- 
nise ns un concours perma- 
nent to us les mots et tous les 
trimesfres! Et avec des prix 
dignes des programmes que 
vous allez nous envoyer! 
De plus, ce seront les lecteurs 
eux -memes qui voteront pour 
leu re programmes pre feres 
sur la grille recapitulative 
mensuelle. 

Pas de jury, pas de decision 
arbltralre, HEBDOGICIEL n'ln- 
tervenant que dans le cholx 
des programmes qui devront 
etre ORIGINAUX et FRAN- 
CAIS. SI votre programme 
n'est pas tout a fait au point. 
un de nos speclalistes vous 
dira comment lameliorer pour 
pouvolr nous le proposer a 
nouveau. 

Pour particlper, II vous suffit 
de nous envoyer vos pro- 
grammes accompagnes du 
bon de participation alnsl que 
toutes les explications neces- 



saires a I'utillsatlon de ce pro- 
gramme. 
Bonne chancel 

Reglement: 

ART.1: HEBDOGICIEL organise 
de (aeon mensuelle et trimes- 
trielle un concours dole de prix 
recompensant le meilleur logiciel 
du mois el du trimeslre. 
ART.2: Ce concours est ouvert 
a lout auteur de logiciel quelque 
soit le materiel sur lequel il est 
realise. L'envoi d'un logiciel en 
K7 ou disquette accompagne 
d'un bon de participation de- 
coupG dans HEBDOGICIEL 
constitue I'acte de candidature. 
ART.3: La redaction d'HEBDO- 
GICIEL se reserve le droit de 
sel action ner sur la base de 'a 
qualite et de loriginalite les logi- 
ciels qui sont publies dans le 
journal. 

ART.4: Ce sont ies lecteurs qui, 
par leur vote, determinent les 
meilleurs logiciels mensuels et 
trimestriels. 

ART. 5; Le prix alloue pour le 
concours mensuel sera remis au 
plus lard un mois apres la clo- 
ture du concours mensuel. 



ART. 6: Le prix allou6 pour le 
concours trimestriel sera remis 
au plus tard un mois apres la 
cloture du concours trimestriel. 
ART. 7: Le present reglement a 
ate depose chez Maitre Jauna- 
tre 1 rue des Hailes 75001 
PARIS. 

ART.8: HEBDOGICIEL se re- 
serve le droit d'interrompre a 
tout moment le present 
concours en avisant les lecteurs 
un mois avant. 

ART. 9: La participation au 
concours entraine I 'acceptation 
par les concurrents du present 
reglement. 

s du Gal 



Sera d6clar6 gagnant le pro- 
gramme qui aura obtenu le 
plus fort pourcentage de vote 
par rapport a la totalise des 
programmes recus pour un 
me me ordinateur. 
Ainsl, pas de favoritism^ pour 
les ordinateure plus puissants 
ou tres diffuses. 



BON DE PARTICIPATION 



Pr£nom 

Age Profession 

Adresse 

N" telephone 

Nom du programme 

Nom du materiel utilise : 

declare etre I'auteur de ce programme qui n est ni une imitation ni une 
copie d'un programme existant. Ce programme reste ma propriete et 
1 autonse HEBDOGICIEL a le pubtier La remuneration pour les pages 
publieessera de 1000 francs par page (un programme n occupant pas 
une page entiere sera remunere au prorata de la surface occupee) 



Le programme doit etre expedie sur support magnehque (cassette ou 
disquette) accompagne dun descnptif detaille du m aterie l utilise, 
dune notice d utilisahon du programme Les supports des program- 
mes publies spnl conserves] n'ouEJtez done pas d'en faire une copie 




Sebastien GUILLAUD 

gagne les 20.000 F. du 
concours mensuel pour 
son programme LUCKY 
BUCK surTI 99 BS. 

Stephana CALLEGARI 

gagne le voyage aux U.S.A 
du concours trimestriel 
pour son programme AL- 
PHAN'ORIC sur ORIC. 



UN P'TIT DEULIGNE, POUR LA ROUTE . 



Cette semaine, les Ihomsomstes squattent le haul el le 

milieu du podium, ne laissanl que les accessits aux 

autres machines Venge?-vous ' Vous ne pouvez pas les 

laisser continue! ainsi us soni les pus nombreux el les 

plus deatils en deuhgne. pour le moment Bon passons 1. Entiez le programme 

aux piogrammes eux-meme. 



Bernard JAECK deplace sa memoire a volonte. Ce grand 
exercice necessite une certaine maitrise que vous acque- 
rerez en appliguant ies conseils suivants : 



JLj Listing T 



Pascal ROUGIER implante une nouvelle fonction a I'Ami 
trad. Pour execuler le programme, veillez a ne pas avoir 
de DOS en memoire et pour uliliser la fonction. tapez 
< SHIFT ARROBAS > et INVERSE puis ENTER 



Jj Listing ORIC 1, ATMOS 

FOR1««4B0TO#41E.RERDR:POKE1,P, H 
EXT :DRTHttR6. 4, »R@, 8, *B1 . 0. ?2. #B1 - Z 
,#91,9. #68 

1 DflTfl#91,2.«Be.#P0,ftF3,*E6.1.«E6 
,3,*D=l,48,6.*D0,»Ee.ltn4,5,*£>0.IIE6, 
96 

2. Lancez-le el entrez dans I'ordre les rJonnees suivan- 



tes : 

a. DOKE 0, adresse debut bloc 1 

b. DOKE 2, adresse debut nouveau bloc 

c. DOKE 4. nombre de sous-blocs de 256 octets compo- 
sant le bloc 1 

d. POKE 5. octets restant du bloc 1 (0 si le bloc 1 est 
divisible par 256) 

3. Faites CALL # 400 



2 DATA e^,HB,C;'.6L,liB.45,4E,56,45-52.53, 
C5.0,CC,9C.BB,L9,01,61.fi6,21.rC.ft&.a,.Ol 
,BC,C9 



% Listing APPLE 



1 PRINT F*j HOME t OR : COLOR- 
I ( PLOT 1,1: COLOR- I3i VLIN 
1,39 AT 0: VLIN 0,3» AT 39i HLIN 
0,3? AT Oi HLIN 0,39 AT 39: FOR 
I - 11 TO 35 STEP 4: HLIN 0, 
10 AT I - ?i VLIN 0,39 AT 1: 
COLOR- OiA - RN0 <1> ■ 34 t 
2: PLOT A/4+1,1 -71 PLOT 
1,A; PLOT 1,A - 1: COLOR- IS 
: NEXT ItX - 34iY - 2:XN ■ X 
iTN - Y:T - 0:F» = CHR» (7) 
Z UTAB STl PRINT "TEMPSi 'T:T - 
T < l:UY(l) - - liW(S> = 1 
:<JX<2> - - 1.UXI3) • liS - 
PEEK t - 14364! |S - UAL ( RIGHT* 
: STR» !S),1)):Y - Y ♦ UY(B):X - 
X * UX<fl)lR - SCRN( X.Yli ON 
R = 13 GOTO 1:E - PEEK < - 
1433d) i COLOR- 7i PLOT X,Yi COLOR- 
): PLOT XN.YNiXN - X:YN = Yj ON R 
< } 1 SOTO Zi PRINT 'BRAVO 



sommets de qualite en jeu 
deux pages graphiques du 

T07 (exclusivement!. A lui de jouer avec deux logiciels 

du soltparade. 

Jl Listing THOMSON T07 

1 SCRfEHl.S, e:Y=-3:FORX=eTO];B-l!0:C-2B9 
:PE-3S: SCREEN,,., :^':L::rORU-7eTOI83STEP8 
iF0Rfi>!) 10 C*8:LINE(e,fl-Pe.8>-CB,h-Pa>,Y 
iLIME-<B,fi),r:LINE-> i C/. h-3 , , V: LiNE-lCfi 
>, VI LIHE-iC.H- »*-.-, i:.I'IE-'7I9.«-PJ+8),VI 

P£"Pe«.aic-c-.8B:B'B-.se:NE)nfl: irv--jTHE 

NY— 3tL5EY«-3 

2 KEXTD: Y = -5 : me,;t:-:: :-:=lii: CONSOLE,, liF0R*= 

iT099!Y"ie.RMp«ieiFORB=*ioi;: :.f::': — ■: 
iFiET.T.BJ" >■■■■> = f t : c k a? i :-: = :■;*< k = 7«nC':-: 1 5i 
-CK»3ANI»K<31)iPl.flV01Lei>0":Ljc^rE::.,i':^FS 

IHT- 30b "iSCREEN l:S=3-.SCREENCX*e.l 

9)■4^>lPSEr(V,B> ,, ":L0CfliEa,e, bippint-sc 

OREi "SiNEXTB.A 



Laurent DEBIAIS nest pas parti en travers pour son gag 
thomsonien Icompletement compatible! et gagne un lo- 
giciel. 



\ Listing THOMSON (tous) 

1 CL£>iR,,a:l>EFr;irif $-*£-»8 



. j.S5£.J4:3!&EFi;S'J. : = J 'J.JO, I 2,1,1.13,40, 

43; E'EFGPf 2 :■=*..>. ii- . f.%. P5, I£ii,a.e:l>£FCR 

-■3JDErcR*< 



,124,34,31, 
1,=E8,6£, 1B7, (?7.1? 
-,?.8:flTTRBl, 



Philippe DAVITS protege ses programmes comme I'eeu- 
reuil ses economies et en uneligne I 



\ Listing COMMODORE 



F:LJCrtTE38, 15: C0L0R51 PR 1 NTCR*(.3>I COL0R1! I 
FOPT=35T05STEP-IILOCHrET, 15: PR INTGR*'. 1 ) : 

flh."li03I":i. ■■■■■ .. "ET. 1S1PRIMT" "iLOCATET, 
15:PPiHTCR«<ai:PLHV"LIBSr:L0CHTET, 15: PR 



A vendredi et noubhez pas le poisson. 




NDLNC : Cette ^., 
bonne nouvetle a vous annon- 
cer. Eh oui ! ca y est la joiie cla- 
viste a eu son bebe. c'esl une 
petite fille, elle est toute mi- 
gnone et elle s'appelle Rebecca, 
etles vont bien toutes les deux 
et la NDLJC vous embrasse 
bien Ion fmoi aussi pendant que 
j'y suis '.!). 

APPLE 

VENDS ou ECHANGE contre 
TI99 complet APPLE 2C decem- 
bte 84 Souris. joystick, moniteur 
Zenith, Nombreux logiciels utili- 
taires et jeux : valeur de plus de 
20.000F. Vendu 14000F. Tel ; 
(73) 69 57 33. Le soir. 

VENDS APPLE 2 + av.drive + 
Control + Chat mauve + livres 
+ nombreux logiciels : 8000F a 
debattre. Tel : (43)45 44 44. 
Week end avant 12h. 

VENDS APPLE MACINTOSH 
128K + Imphmante imagewriter 
+ Macwrite/macpaint + sac 
transport + logiciels : 24.0OOF. 
Tel : 503 01 48. Le soir el le 
Week end. Mr Mackinney. 

TI99 

VENDS pour TI99 4A modules 
Mini memory avec livre assem- 
bleur en franca is et deux casset- 
les (assembleur et boxe) : 600 F, 
Basic etendu avec manuel Iran- 
pais (donne nombreux program- 
mes sur cassettes) : 550F. Jeux 
TF invader, Parsec. Jawbreaker 
2 : 120F piece. REMOIVILLE 
Eric BUZY 55400 ETAIN Tel : 
(29) 87 04 85. 



VENDS pour TI99 4A Parsec 
100F. Hustle 150F, Hunt the 
wumpus 90F, Car wars S0F. 
Amazing 90F ou 450F le tout 
Tel : 631 13 01. 

VENDS TI99 4A - Basic etendu 
+ mane ties + module jeu 
d'echec + polar system + lunar 
lander 2 + Basic etendu par soi- 
meme + jeux et programmes 
pour TI99 le tout 1800F. SOTO 
Frederic. Tel : 656 74 60. 

VENDS pour TI99 4A K7 de 
jeux Golf? la tombe du sorcier !e 
tout: 100F + livres 99 maga- 
zine N3. Pratique de lordinateur 
familial TI.-99 n° 1 et 2 accompa- 
gne de 40 programmes prati- 
ques + micro jeux 80 program- 
mes le tout : 150F. PEDONE 
Frederic. Tel : 836 21 92. 

VENDS TI99/4A Peritel + Ex- 
tention 32 Ko + Basic etendu + 
Interface RS 232 + systeme pe- 
ripherique + unite de disquetle 
+ controfeur + magneto K7 + 
Cordon + 6 modules de jeux 
(Mash, Parsec, Foot. Invaders, 
Pac Man et Star Trek) + 500 
programmes + 50 disquettes 
+ manettes. Valeur 13.000F 
Vendu 9000F (avec facture) Op- 
tion imprimante Sukoshu GP 
100 pour 1500F. Tel: 090 72 
35. PHILIPPE. 

VENDS TI99 (12/84) + Peritel 
+ Cordon K7 + Magneto + Ma- 
nettes + Basic etendu + Ma- 
nuel francais f Lunar lander + 
lunar jumper + solar system + 
modules (Tl-fnvaders + Munch- 
Man + Football + Music Maker 
+ WUMPUS) + programmes 
sur K7 le tout 3500F a debattre 
Tel : (65) 42 71 41. 

VENDS modules CRISHOLM 
TRAIL : 100F, TOMSTONE 
CITY ; 100F ?. BURGER TIME : 
150F, HOPPER : 150F. DEMON 
ATTACK: 150F. Tl Invaders: 
150F, Editor Assembleur + 2 
disques : 450F. K7 en Basic 
etendu : Lunar lauder : 60F, 
Solar system ; 80F. Olivier (3) 
973 33 42. 



VENDS pour TI99 4A : Basic ex- 
tended ■+ 7 modules (Munch 
Man, Tl invaders. Gestion de fi- 
chier ....) + K7 Hebdo n" 2 + 5 
livres (a la decouverte du Tl 
avec cable + programmes sur 
cassettes. (Valeur 13.000F) 
Vendu 2200F URGENT en TBE. 
Lionel RUELLAN. 5 cours des 
bordes 78760 PONTCHAR- 
TRAIN. Tel : 489 44 77 (apres 
17h et le week-end entre 9h et 
13h.) 

VENDS TI994A + boilier d ex- 
tension + memoire 32 Ko + 
Basic etendu + magneto Tl + 
cordon +- manettes de jeux + 
jeux (Foot, Tombstone city. 
Lunar launder 2) + cassette 
basic par soi-meme + nom- 
breux livres (programmes. 99 
magazine "A la decouverte du 
TI99/4A). Le tout 4000F ou se- 
parement. Pierre DAURANGES 
DAUPIN 93230 ROMAINVILLE. 
Tel: 846 17 83 apres 1Bh. 

VENDS TI99'4A + peritel + 
alim + manettes de jeu + cordo 
magneto + B.E (manuel fran- 
qais) + Mini, mem (manuel an- 
glais) + gestion fichier (manuel 
franqais) + listings pour TI99 
B.S el B.E (Hebdogiciel n= 1 a 
n° 72) + nombreux livres et do- 
cumentation. Lot indivisible 
3000F. Joel PINASSAUD. La 
Miolane Bat F2 chemin Le Sau- 
vet 83270 ST CYR.'MER. Tel : 
(94) 26 39 98 (apres 20h). 

Achete console TI99.4A hors 
d 'usage pour pieces detachees. 
Cherche module extention + 
memoire 32 Ko + Lecteur dis- 
quette complet en bon etat 
Faire offre a MEUNIER R 16300 
BAHBEZIEUX. Tel : (45) 78 1 1 



79. 

VENDS TI99 + adaptateur + 
Rubis sacre + Basic etendu ma- 
nuel francais + manettes + cor- 
don adaptateur Atari + cordon 
K7 + 6 K7 + 5 livres + 15 Heb- 
dogiciels : 1890F avec en 
plus II! 140 beaux programmes 
gratuit. DAVID Jerome, 160 rue 
de Sagnoiet 75020 PARIS. Tel 
360 96 92 apres 18h. 



VENDS TI99 4A avec Joystick 
1200F.G COLLINS 76 rue de la 
pompe 75116 PARIS. Tel: 774 
86 28 le soir. 

VENDS TI99 4A + peritel + ali- 
mentation f magneto + |oystick 
+ module : pole positron + the 
attack +■ gestion de fichier + 
statistics + jeu retro 2 + Basic 
par soi-meme + aide programa- 
(ion + 7 livres + nombreuses 
K7. Gilles GODINOT au 701 07 
88 apres 18h. 

VENDS TI99'4A + Alimentation 
+ interface + cordon magneto 
K7 + magneto k7 Brandt M102 
+ poignees de jeux + modules 
echecs + programmes sur k7 + 
manuel d'ulilisation en francais 
1400F a debattre. Mr HENNO 
Jean Luc 16 square Ronsard 
77350 LE MEE sur SEINE. Tel : 
452 91 7t. Tel bureau : 558 85 
53. 

VENDS TI99/4A + manettes de 
jeu + cordon de raccordement 
+ modulateur secam + 2 livres 
+ Parsec + Moons weeper + 
echecs. Le tout : 2100F + 
Moonsweeper 100F. Tel : (80) 
31 23 80. Philippe HERTZOG 7 
rue du Roussillon 21 1 10 
GENUS. 

VENDS Tl 99/4A + basic 
etendu + manettes de jeux + 
15 modules de jeux dont Echec 
+ Moonsweeper + Startrek + 
Mash + Demon ARak etc... + 4 
livres de programmes Prix 3800 
F Gilles WATERMAN 16 AV 
des Heleux 54280 SEICHAMPS 
Tel (8) 329 12 60 

VENDS Tl 99/4A + manuel + 2 
manettes + Blasto + Parsec + 
Moon Patrol + programmes sur 
K7 + prog basic etendu Prix 
2800 F + magnetophone Prix 
2900 F Sylvain BOURDALE Tel 
(33) 59 10 77. 



VENDS Tl 99/4A + adaptateur 
secam + cordon magneto + 
Soccer + Manettes. P. GA- 
BALDA rue de la Gare 49690 
Coron Tel: 55 83 04 apres 19 H 



VENDS Tl 99/4A adaptateur 
secam modules parsec et pole 
position 2 manuels et 1 cassette 
de programme 1 99 magazine 
cable magnetophone Prix 1800 
F Oivier de MONTGALFIER 1 
rue Phelypeaux 69100 VIL- 
LEURBANNE Tel: B89 67 17. 

VENDS Tl 99/4A basic etendu 
+ Mini memoire: 1900 F. boitier 
d extension + peripherique RS 
232 C + extension 32 Ko 
controleur -t- unite de disquettes- 
7000 F. Seikosha GPJOO MK2: 
1700 F, Logiciels Traitement de 
texte + Gestion de fichiers + Fi- 
chier d'adresses: 900 F. Parsec 
+ Suntheliseur Speech Editor: 
750 F. Othello + Echecs + 
Munchman + Hunt the 
Wumpus: 600 F. Tl logo II 
Francais + Early Learning Fun 
Number Magic: 500 F. Black 
Jack et Poker Adventure 3 cas- 
settes: 250 F. Tel: (40) 59 35 87 

VENDS Tl 99/4A magneto + 
cable + manettes + basic 
etendu + modules + 1 jeu 
d'aventure + nombreux listings 
avec plusieurs revues + pro- 
grammes sur cassettes Prix 
3750 F. PENISSOU Philippe 36 
rue de billancourt 92100 Boulo- 
gne Tel: 603 41 02. 

VENDS Tl 99/4A peritel lecteur 
de K7 manettes ds jeux exten- 
sion memoire 32 K ext. basic 
Mini Memoire + Tl calc + 12 
modules de jeux + 8 livres sur 
le Tl + nombreux programmes 
de jeux sur K7. Prix: 3500 F. 
AUDIFFREN Daniel 78 la Tail- 
lette 95180 Menucourt. Tel: 442 
34 29 apres 18 H. 

VENDS Tl 99/4A cable K7 Prix 
1000 F ext basic Prix 600 F 
pascal ucsd Prix 2000 F Edit. 
Assembleur. Prix 500 F. Logo II: 
Prix 600 F. Gestion Fichiers. 
Prix 200 F, Aids I a III. Prix 200 
F. Livres et notices techniques 
JL FRITSCH 2 rue du Romarin 
68770 AMMERSCHWIHR Tel: 
(89) 78 23 74 apres 19 H. 



VENDS Tl 99/4A + magneto 
Radiola + joystick + cordons 
(magneto monitor) + peritel + 
basic etendu + mini memoire + 
Echecs + Pole position + Par- 
sec + 8 cassettes jeux + 2 
livres (50 prog, assembleur) le 
tout indivisible: 3000 F Tel 959 
35 40. 

VENDS Tl 99/4A + magneto + 
cable magneto + joystick + 
prise Peritel + adaptateur 
secam + manuel + livre + cas- 
settes. Prix: 2200 F, CROCHE- 
TET Didier Gugrtey aux aulx 
884SO Vincey. 



ORIC ATMOS 

VENDS ou ECHANGE program- 
mes et utilitaires ATMOS (K7 
commerce). P. HUGUET. 232 
crs Balguerie 33300 BOR- 
DEAUX. Tel : (56) 50 24 78. 

VENDS ORIC ATMOS 48 KO 
16 couleurs + 10 K7 + manette 
de jeu + interface de branche- 
ment : 2200 F. Tel : (1) 704 97 
43. 

VENDS ORIC 1 48 K complet + 
manuel + peritel + divers pro- 
grammes + fivres + revues + 
interface 8 sorties pour 
commander lampes, moleur...+ 
interface jeu de lumieres pro- 
grammable en basic : 2100 F, 
Tel: 

VENDS pour ORIC 1 ou 
ATMOS nombreuses K7 de jeux 
(tous des originaux) : 70 F 
piece. Tel: (22)46 17 69. 

VENDS ORTIC ATMOS + im- 
primante couleur MCP 40 + in- 
terface manette + manette + 
alimentation + cable TV. + i 
cable peritel + cable magneto + 
manuel + papier + stylo neuf + 
logiciels + modulateur NB. + 
possibility mettre 2 ROM. : 4000 
F. Pierre LESTRADE. 3 rue Ce- 
zanne 30600 VAUVERT. 

VENDS ORIC 1 + magneto + 
35 programmes + divers cables 
+ 5 livres de programmation : 
2200 F. Tel: (61) 20 81 78. 



C est I histoire c I un mec qui avart plein de logiciels en stock, meme qu'il arhvait pas a les vendre tous. Les essayeurs fous d'Hebdogiciel les avaient testes avaient 
selectronne les bons, les marrants avec des jol.es jaquettes et des modes d'emploi en franpais. Et comme le mec il voulait sen debarasser Hebdogiciel a rachete les 
meilleurs pour une bouchee de pain brioche. Hebdogiciel. il les a mamtenart dans son stock a lui et il les vend a un prix meme les anglais en ont jamais vu comme ca ' 
Oomme d habitude, vous envoyez vos-sous au General Foy et vous criez le plus fort possible: "Merci. IHHHebdo" I" " 





NOTICE EN FRANCAIS 



- ElEKTROsrOfiM 




60 FRANCS? CAVA PAS LA TETE! 



SPECTRUM 

BLADE ALLEY 

Secteur mal fame at lend liberateur au grand 

coeur. Ne pas oublier son laser lourd. 

CENTI-BUG 

Centi = centi. bug = pede ! 

PEDRO 

Toi grand jardinier, moi petite fourmi. Moi 

manger fleurs a tot. toi defendre plantations ? 

ZOOM 

Beau. Ires beau. Dur, tres dur. Genial et pas- 

sionnant, un vrai jeu de cafe. 

STONKERS 

La guerre a deux, c'est quand meme plus 

drole que tout seul. 

ALCHEMIST 

A la poursuite de la pierre philosophale, vous 

perdrez plus dune fois la vie. mais pas la 

passion. 

BEAR BOVVER 

A la poursuite de la pile perdue pour voire 

camion electrique. (aussi sur Commodore) 

JAWZ 

Comme tout bon requin qui se respecte, la 

(aim vous lait sortir du bois. Plein de pois- 

sons dans le viseur vous remonierons le 

moral. 

LES FLICS 

Un diamant comme la panthere rose, ca vaut 

bien quelques meurtres non ? 

APPLE JAM 

La boulimie vous guelle, mais le sauna vous 

attend. Ou( ! 



STARBLITZ 

Vile et bien a I'assaut des galaxies ennemies. 



ZX81 



DALLAS 

Coulez les Ewing grace a vos puils de pe- 
trole. 

CORN CROPPER 

Le mais cest du ble en puissance. A vous la 
fortune ! 
GALAXIANS 

Piou piou ! Ca vaut n'importe quel Space In- 
vaders et ca marche sur ZX ! {aussi sur 
Spectrum) 
3D GRAND PRIX 
Pole position pour ZX, ca existe. La preuve ! 

COMMODORE 



KRISTAL OF ZONG 

De lavenlure, des epees. des monstres. des 

tresors et tout au joystick. Un must absolu 

DEFENDER 64 

Mieux quau cafe, sans effort. I'humanite a 

sauver. Une paille a trouver dans une tonne 

d'aiguilles- 

ORIC 



LIGHT CYCLE 

Des motos et des hommes dans un univers 
electromagnetique. Des vibrations angoissan- 
les assurees. 



LES SUPER-METEORES 

Votre vaisseau dispose de quoi laire sauter la 
moitie de la galaxie. mais vous devez d'abord 
traverser ces pulains de champs d'asteroi- 
des. Dur, Ires dur ! 
ARENA 3000 

Vous etes presque aussi baleze que Super- 
man el Goldorak reunis mais tous. absotu- 
ment lous les occupants de cette arene vous 
en veulent a mort. 
SCUBA DIVE 

Les huitres c'est bon noijr la-oat — 'NUk IJT 
nsrlps n'pgt_aa—^lllAilLii. mur | e porte- 

CENTIPEDE 

Grand classique. Innenarable ! (aussi sur 
Commodore) 
THE ULTRA 

Malheureusement, il ne sail compter les ta- 
bleaux que jusqu'a cent ! 
ELEKTRO STORM 

Grace a Dieu. vous disposez encore de quel- 
ques tetes nucleases pour pro teg er votre 
"Home sweet home". Une chance, non ? 
LA REVANCHE DE DRACULA 
Que vous tuiez les loups-garou^le^mnptiiss 
ou les goules, lo '""Tip '•^-^^"^^•■' anrton 
"•*"' » I | '•'■" prochaine: 

*flUU(juUUUUU I Epuise! 
LE GEANT DE GLACE _ 

appflta**efWTTOs I aurez ce uoliath. Epuise! 

M.A.R.C. 

MARC pour "Maman les Aliens Recommen- 

cent leurs Conneries". Infernal et genial. 





NOTICE EN FRANCAIS 
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RECHERCHE SYNTHE vocal 
ORIC ATMOS avec documenla- 
lion. Fabrice FOUCHER. La Ro- 
derie 44830 BOUAYE. Tel : (40) 
65 43 06. 

CHERCHE tecteur de disquelte 
pour ORIC ATMOS en etat de 
fonctionner. Marc LHARDY. 84 
avenue Jean Jaures 93500 
PANTIN. Tel : 845 94 73. 

VENDS ORIC 1 64 KO + 2 
ROMS ATMOS {interface TV S 
+ ROM cenlrale) + lous cor- 
dons + 300 logiciels compati- 
bles + 20 livres sur ORIC + do- 
cumentation : 2600 F, a 
debattre. Tel : 287 82 96 de- 
mander Bruno. 

VENDS ATMOS 48 K + inter- 
lace SECAM + cordons + 6 K7 
+ 3 livres : 2300 F. on 
ECHANGE contre un Tl 99 + 
BE. Tel : (63) 60 81 33. 

VENDS ORIC ATMOS 48 KO + 
50 jeux + crayon optique + 
livres + cordon peritel + alimen- 
tation : 2000 F. Cedric DIELE- 
MAN. 35 rue du Marechal Foch 
57800 FREYMING MERLE- 
BACH. Tel: (16 8)704 48 78. 

CHERCHE ORIC 1 (sans acces- 
soires) : 1200 F. Franck NA- 
VARRO. Tel : (67) 62 35 68. 

VENDS ORIC ATMOS 48KO + 

alimenlation + peritel + impri- 
mante tracante (sous garantie) 
■i differents plans de montage 
(carte vocale, modem) + nom- 
breux jeux. sur K7 i program- 
mes sur K7 + listings de pro- 
grammes : 5000 F. Marc 
ROSSI. Resid. Laurelia BtB rue 
Republique B3140 SIX FOURS. 

VENDS ORIC 1 48 KO + peritel 
+ aJimerrlalion + documentation 
+ disassemble ur ; 1700 F 
Pierre LACOMME. 10 BD Char- 
tot 77100 MEAUX. Tel : 025 34 
55. 



VENDS ORIC ATMOS 48 KO 
(sous garantie) ■ magneto K7 
PHILIPS (Data recorder 6600 P) 
*■ peritel avec alimentation I 
modulateur NB. # livres + 
divers logiciels : 2000 F. Patrice 
HIMBERT Tel : 294 96 96. 

VENDS ORIC ATMOS + cordon 
peritel + alimentation + tout 
materiel + 7 K7 : 1500 F. Tel : 
(16 63) 63 20 30. (NDLNC : 
Merci pour le joli sumom, j'y 
penserai). 

VENDS ORIC 1 + cables et ali- 
mentation + manuel + K7 12 
jeux : 1450 F. Tel : 590 15 90. 

VENDS ORIC 1 48 K + ma- 
gnelo K7 + modulateur NB. + 
cordons divers + logiciels (10 
K7) + livres el listings : 1800 F. 
Tel : (93) 51 12 65. 

VENDS OHIC ATMOS 48 K + 
10 K7 de jeux + 3 livres + in- 
terlace joystick + cables : 2200 
F. En option adaptateur Peritel 
RGV : 200 F. Tel : 846 69 55. 

VENDS ORIC ATMOS 48 K +■ 
magneto + 7 K7 + livres : 2000 
F. B. SAMPOL. 4rue des Oeil- 
lets 66350 TOULOUGES Tel : 
(68) 55 44 34. 

VENDS ORIC 1 + 20 jeux + 
magneto + joysticks + interface 
+ tous cordons + programmes 
+ nombreux accessoires : 2500 
F. Tel : (6) 457 26 18. 

VENDS ORIC ATMOS 48 K + 
interface compatible ATMOS 
ORIC + unite de disquette 230 
KO + logiciels .alimentation Sta- 
bilisee : 5500 F. a debattre. Tel : 
85 20 75. 

VENDS ORIC 1 48 K + Peritel 
+ cordon magneto + alimenta- 
tion + 350 programmes sur K7 
+ manuel + "Visa Oric" + 
"Guide Oric" + "Communiquez 
avec Oric" + "Extension Oric" + 
Microrics N° 1 el 2 + Hebdogi- 
ciel N° 1 a 32 : 2000 F. a debat- 
tre. Armand COLLIN. 2 rue des 
Atouettes 57800 COCHEREN. 
Tel : (8) 704 45 00. 

VENDS ORIC 1 4B KO + ali- 
mentation + Peritel + cordons 
K7 + 5 K7 jeux + cordons ma- 
gneto + nombreux listings + 
Irvres + programmes : 1200 F. 
+ magneto: 150 F. Nicolas 
KES1C. 14 rue du midi 78180 
VOISINS LE BRETONNEUX 
Tel : 043 04 64. 



VENDS ORIC ATMOS 48 K I VENDS pour ZX 81 16 KO Me- 
prise peritel * decodeur pour motech Ires bon etat * pro- 
TV. sans peritelf • K7 'Aigle grammes: 180 F. Franck LE- 
dor": 2000 F. Tel : (56) 31 14 QUEUX. 4 rue de Toulouse 
75. 75019 PARIS- 



VENDS ORIC 1 48 KO + peritel 
+ alimentation + cordon K7 t 
lecleur K7 + interface joysticks 
+ 50 logiciels : 2100 F. Herve 
CAILLOUX. 44 rue Antoine Fra- 
tacci 92170 VANVES. Tel : 642 
33 14.(NDLNC: La nouvelle 
maman le remercie pour les 
voeux el moi aussi). 

CHERCHE genereux donnateur 
dun ORIC 1 a jeune handicape. 
Jean Marie FRANCOIS. 18160 
MONTLOUIS. 

VENDS ORIC ATMOS + cordon 
pentei + alimenlation + tous 
cables d'origine + magneto et 
cordon + manuels + Aigle d'Or 
• Diamant lie Maudite + Way- 
dor + Zorgon + Xenon + Orion 
+ Chateau du diable et de nom- 
breux autres jeux sur K7 : 2500 
F, Michel OUZGN. 25 allee des 
platanes 93B0O EPINAY 
S.SEINE. Tel : 827 57 23. 



VENDS ORIC ATMOS + adap- 
tateur NB. + peritel + 50 pro 
grammes : 1900 F. + impri- 
mante MCP 40 : 1600 F. Tel : 
(43) 94 07 20 demander Phi- VENDS ZX 
lippe. 



VENDS Le petil livres du ZX 81 
el la Conduite du ZX 81 : 120 F. 
Herve BOUQUEUNIAUX. 46 rue 
Henry Bodol 59153 GRAND 
FORT PHILIPPE. 

VENDS ZX 81 + manuel + K7 
nombreux programmes + 2 
livres (Lang age Machine. 
Conquete des jeux) : 500 F. 
Tel :26 64 18. 

VENDS ZX 81 + 16 K + clavier 
ABS + 10 K7 jeu + 102 pro- 
grammes + livre fourni avec 
cables el manuel : -40% Prix : 
1200 F. Tel: 533 66 29. 

VENDS ZX at 16 KO sous ga- 
rantie + clavier mecanique + 
revues + 10 K7 de jeux + cable 
+ livre pour ZX. Tel : 16 74 26 
52 47 aux heures de repas. 

VENDS ZX 81 + 16 K sous ga- 
rantie : 700 F. + K7 de jeux : 
100 F. + 2 livres de jeux : 150 
F. + n° 14 d' Hebdogiciel + TV. 
NB. : 100 F. ou le tout : 900 F. 
Tel : 470 29 57. 



ZX 81 

VENDS ZX 81 16 K + clavier 
ABS + magneto BRANDT 
(compteur) + TV. PHILIPS NB. 
+ nombreux programmes sur 
K7 + livres "Etudes pour ZX 81 
tome 2" "ZX 81 a la conquete 
des jeux" "La conduite du ZX 
81" "70 programmes pour ZX 81 
"Langage machine pour ZX 81" 
+ listings + tous Ordi 5 : 2000 
F. a debattre possibility de vente 
separee. Philippe SAUREL. 3 
Chemin de Gery 26200 MON- 
TELIMAR. Tel : (75) Of 43 78. 

VENDS ZX 81 : 400 F. + 16 K : 
200 F. + interface manettes de 
jeu : 180 F. + clavier mecanique 
Memotech : 400 F. ou le tout : 
1600 F. + 11 logiciels gratuits. 
Jerome BARRUE. 1 rue Jean 
Moulin 78210 St CYR I'ECOLE. 
Tel: (3)045 47 11. 

VENDS ZX 81 + 16 K + clav.er 

+ 3 K7 + alimentation : 950 F 
A. GORET. Les blondeaux St 
Martin S/Ouanne 89120 
CHARNY. 



16 K + clavier 
video + Beep 
Clavier + magneto + jeux + 
revues. Tel : (67) 56 18 66. 



VENDS ZX 81 + 16 K + clavier 
ABS + auto repeat + manuel : 
950 F. + K7 jeux moilie prix. 
Tel: (61)24 09 63. 

VENDS ZX 81 16 K + inv-video 
+ interrupted + clavier mecani- 
que ■-■ alimentation -■ cable ma- 
gneto + 60 programmes + 3 
livres + 5 Echos- Sinclair + 4 
Ordi 5 + 1 hebdogiciel + di- 
verse documentation. Philippe 
LACQUEHAY. 8 rue de ia Saus- 
saie 77310 ST FARGEAU PON- 
THIERRY. Tel: 409 80 34. 

VENDS ZX 81 + extension 16 K 
+ programmes : 500 F. Bruno 
VEREYCKEN. 15 allee de la toi- 
son dOr 94000 CRETEIL. Tel : 
207 24 96. 

VENDS COFFRET ZX 81 + 16 
K + interface manetles + joys- 
lick + magneto + Echecs + Pa- 
trouille de I'Espace + ZX Multifi- 
chier + programmes sur K7 : 
1500 F.Tel: (6) 020 61 62. 



VENDS LASER 200 - 64 K + 
joysticks * magneto - program- 
mes : 2500 F. Tel : 707 14 90 
Apres 19h30. 

VENDS LYNX 96 K + jeux : 
Spannerman. Treasure-Island. 
Reversi. Chancellor. Echec. 
Floyd Bank, Pac-man. Cobble 
de spooh. Atom smasher. Power 
Blaster. Zen... : 4000 F. ou le 
LYNX : 3800 F. el les jeux :,250 
F. Tel : (45) 95 26 77 apres 
20h30. 

VENDS CLAVIER alphanumeri- 
que adaptable sur console MAT- 
TEL permet de creer ses pro- 
pres jeux : 750 F. Thierry 
LIEVIN, 17 rue ST V«icent 
10370 VILLENAUXE LA- 
GRANGE. Tel : (25) 21 31 36. 
VENDS jeu d'echec SCISYS 
CHESS INTERCONTINENTAL 
TRAVELLER (8 niveaux de diffi- 
cultees. parties speciales pro- 
grammables) : 400 F. + Tl 55 II 
sous garantie : 250 F. +■ pro- 
grammes pour C 64 sur dis- 
quette (Pac Man. Pole Position. 
Donkey Kong . 100 F. Tel : (33) 
38 10 57. 

VENDS ordinateur ADAM CBS 
80 K + imp. + console de jeux 
+ jeux et K7 : 5000 F. Tel : (94) 
62 1091. 

VENDS imprimante graphique el 
texle GP 100 A + interface 
RENTRONICS: 1500 F. Tel: 
831 21 08entre I9het20h. 

ACHETE HEBDOGICIEL du N° 
1 a 15. Eric LE JOSSEC. 39 
boulevard Bourjalliat 78440 
PORCHEVILLE. 

VENDS Impr. MT 80 MANESS- 
MAN + un ruban : 2900 F. M. 
LANGLAIS. 15 boulevard Lenine 
93290 TREMBLAY. Tel : 203 41 
28 poste 323. 

VENDS jeu video VECTREX 3 
K7 + jeu integre : Prix interes- 
sant. Laurent HURIEZ. 1 1 rue 
Pierre Madame St Vaasl de lon- 
gronl 60410 VEBBERIE. Tel : 
(4) 440 94 68. 

VENDS PB 100 + extension 
OR1 + imprimante FP 12 + int. 
K7 FA3 + livre + K7 de jeux : 
1200 F. a debattre. Yannick 
VINCENT. Les Bordes DOM- 
SURE 01270 COLIGNY. Tel : 
(74) 51 22 43. 



VENDS AQUARIUS 1 (4K) * 
cartouche de jeux Aslromash 
800 F. Tel 533 42 05. 

ECHANGE PB 100 * extension 
memoire OR ! + interface K7 
FA3 + imprimanle FP 12 + 4 
K7 de programmes LO- 
GI'STICK. contre un CANON 
X07. Laurent MOLLICONE. 107 
bis rue Constant Coquelin 
94400 VITHY S SEINE. 

VENDS micro ordinateur LASER 
200 adaptable sur toute TV. 8 
couleurs 4K extensible a 64K + 
K7 programmee : 900 F. Tel : 
(80) 66 43 27. 

RECHERCHE materiel informati- 
que et lout ce qui s'y rapporte. 
Philippe HUGUET. Resid. G. 
Clemenceau 10 allee des 
Vosges 37000 TOURS. 

RECHERCHE HEBDOGICIEL 
N* 1, 2, 5. 6. 7. 8. en bon etat 
complet au prix d'origine. Em- 
manuel DUPAS. 12 rue Pierre 
Curie 91390 MORSANG 
S/ORGE. 

VENDS DRAGON 32 + alimen- 
tation + cables + cordon impri- 
manle + joysticks + nombreux 
jeux : 1999 F. Tel : 576 57 12. 

POSSESSEUR MTX 512 
CHERCHE petils cousins de 
France et de Navarre (et meme 
de Papouasie seplentrionale) en 
vue creation reseau MTX. M. 
DELNORD. 13 rue de I'Equerre 
07130 ST PERAY. (NDLNC : Eh 
Cost ou la Papouasie chose la. 
c'est nouveau, ca vient de sortir 
ou quai ? >). 

VENDS ou ECHANGE console 
de jeu UNTELVISION + 4 car- 
touches contre moniteur ou TV. 
et RECHERCHE ou ACHETE 
methode pour copier les K7 sur 
T07 70. Guillaume CLAMENS. 
39 rue de Noailles 78000 ST 
GERMAIN EN LAYE. Tel : 973 
03 17. 

CHERCHE THEOPHILIENS 

pour echanger, bidouiller, discu- 
ter. pi rater et jouer. habitant 
pres de chez moi si possible. 
Francois RIMASSON "La Fon- 
derie" 35170 BRUZ. Tel : 52 93 



VENDS ordinateur de jeux Vi- 
deopac jet 25 avec deux casset- 
tes (Catapulte et Super Giou- 
ton) : 450F. Tel : 984 06 16 
apres I9h. 



GAG?... NON... PUB! 



VIDEOTROC 

VENTE - ECHANGE - DEPOT DE 

TOUT MATERIEL VIDEO ET MICRO- 

INFORMATIQUE - 1000 JEUX 

I NOS PRIX NEVFS l\ 



MONITEUR COULEUR . 2490 F LF.CTEVR D1SQUETTFS + Ijn, : 2 mo F 
ATARI m0 XL SECAM : I7IUI F V,«m,„< t\„:,i )„;hrf -vWF 

II) DISOUFTTFS NASHUA : I45F Imprtmuttt BROTHER . u.t.lu,, ■ > 790 F 
AMSTRAD .\fSXCA\<)\ V'll. IWIFImprimame I990F 

+ moniteiir couleiir :4 490F oric ATMOS : 1490 F 

+ momitiir nwnticiimm? .' <)Wi F CONSOLE CO! ECO CBS ■ 990 F 
./.,„„■« QUICK SHOT It. I20F CBMMPAL + IJeu ■ 24 WF 

SPECTRUM + - 1690 F CBM M PhHet + / ivii - .'Wl F 

OUVERT DU MARDI AU SAM ED/ DE 10 H A 19 H 00 

W bis. me tie Cliareitmn 7HII2 PARIS 

iel.:142.l8M 

metro :%are tie Lynn. Letlnt tialtin 



LES BOUTIQUES DES 
BRANCHES CABLES 



TOUS LES LOGICIELS FROM USA 
pour ATARI, CMB 64, APPLE, 
COLECO. 

U7 avenue de VOIiers 75017 PARIS 

766.1L77 
163 avenue du Maine 75014 PARIS 

54L4163 



VISMO 

Vente infonnatique service micro ordinateurs 

ORIC, SINCLAIR, AMSTRAD 

Moniteurs couleur et N/B. 

Tous peripheriques 

ASSEMBLEUR MONAMS 
Recommande par Hebdogiciel 

84, bd Beaumarchais 75011 PARIS 
12, bd de Reuilly 75012 PARIS 




gtf0fBl 



hector* 

Coffret micro -loisirs 



ir internes 



BlSIC el iuuuheui unrmo 

3 programmes ;- -'}Q(y 

- 2 poignee; + 2 livres 

1 1.990 ' 

Port el 



hcctorX 

Coffret L o isirs-Plu s 

Micro 48 K avec 
Basic III interne 
+ 3 programmes 
+ 2 poignees + 1 



3»90j 



Porte! 

...150' emballageensus.. 

Dans la limile des slocks disponibles 



13.990' 



VIDEOSON 



40, rue de la republique 

91150 JTAMPES - Tel. (6) 494.46.49 

\tardi au Samedi 9h-12h, 14 h 15 - 19 h IS 



VIDEO 107 INFORMATION 

♦ ♦ ♦ ♦ ♦ 

PLACE DES FETES 
75019 PARIS 

SINCLAIR Qi 5490F 

SPECTRUM + 1 900 F 

CBM64 + Lect. K7 2 990 F 
ORIC ATMOS 1 690 F 

AMSTRAD VERT 2 990F 

re/. : 20122.34 - 20146.09 



L'EXPERIENCE MICROPUS 

La Maison de Vlnformatique 
. MICRO-ORDINATEURS PERSONNELS : 

- ORIC - ALICE 

- SINCLAIR - ELECTRON 

- THOMSON - MSX 

- COMMODORE - AMSTRAD 

- LAZER - EXEL 100 

- CANON - DRAGON 

Nous disposons de la quasi totaliie des accessoires 
el periplteriques associes a nos marques el ceci 
durani route I'annee. 

. COURS DE FORMATION 

15 cours GAMBETTA 

34000 MONTPELLIER 

(67) 92.58.83 



ARK ! ARK ! ARK ! 

Festival du Film d'Humour 
CHAIUROUSSE 85 (2) 



E222 



Bon. ben il nous reste des las 
de choses a vous dire sur ce 
Festival 

D'abord, on a oublie de vous 
causer du Jury, II n'y avail pas 
beaucoup de slars et c'esl 
peul-etre mieux ainsi. beau- 
coup plus de professionnels 
On peut tout de meme citer 
Jean-Pierre MARIELLE. Albina 
du BOISROUVRAY et Nina 
COMPANEE2 (Les Dames de 
la Cole. etc.). mais c'est vrai- 
ment pour vous faire plaisir. 
Tout d'abord les courts meira- 
es. lous frangais. que 
etaienl vraiment les mieux. 
saut un. 

Le plus mieux a noire avis 
c'esl "L'Erreur Esl Humaine'' 
de A. Valardy. "Gratte Ciel" de 
C. Jacrot. "Et Dieu Crea La 
Prise' de M. Jolivet, "'Schmock" 
__ N. Levy, "Coup Dur Chez 
Les Agneaux" de D. Corbin — 
■'Contact" de G. Dathis, sans 
oublier "Grosse" de B. Roiian. 
Ah ! parce que normalemenl 
plus mieux c'est qui doil y e 
avoir qu'un seul ? Ah zut ! On 
avail pas compris. mais ~" 
tout, on arrive pas trop a se 
decider, ennuyeux, non ; 
Retenez bien tous ces 
la. parce que comme la pluparl 
d enlre eux seront diffuses a la 
tele, faudra pas les manquer 
Pidouzzz vous les rappelera 
en temps voulu (y s'endort Pi- 
douzzz. "Et Dieu Crea La 
Prise" esl deja passe a la tele, 
eh banane I Clou). 

a quand meme 2 que 
dont on va vous causer un peu 
phis: 

'COUP DUR CHEZ LES 
AGNEAUX" de Dominique 
CORBIN est hachement origi- 
Prenez Le Loup Et 
L'Agneau de La Fontaine, met- 
tez le dans un shaker avec un 
fils naturel de Sid Vicious et de 
Mad Max. Faites-le vers Lyon 
pour avoir la version Guignol, 
rajoulez un zeste de John 
Wayne el un ticket choc de la 
RATP el vous obtenez le lilm. 
Tres. mais alors la. tres rigolo. 
CONTACT" de Gilles DATHIS 
vous en mei plein la gueule. Et 
en plus de ga. apres I'avoir 
je suis sur que vous voudrez 
tous avoir le meme jeu video 
sur voire becane. Ha ! Ha 1 Je 
vois que vous dressez loreille 
el que vos yeux s'exorbiienl a 
la vue du mot "video game" ' 
Eh bien oui, chers lecteurs i 
lectrices. it s'agit dun je 
video, maiiiiiiiiiis avec de vra 
acleurs. qui se balancenl des 
bagnoles en travers de la tran- 
che, tout ga etant lail en image 
par image (tout comme le lilm 
Corbin). du travail dorfe- 
vre ! Un regal ! A noter que ce 
jeu n'existe pour linstanl que 
pour PROJO 16. en assem- 
bler KODAK. 

Et mainlenant... TAAATATIN... 
BtANCA ! 

Le film du festival. Mais alors. 
qu'est-ce qu'il y faisail. hein. 
dites-moi ? Ce film a ete rea- 
rar Nanni MORETTI. En- 
un Rilal. el un bon en 
plus, daulanl meilleur que non 
seulemenl il la realise, mais 
plus il en a ecrit le scenar 
el tient le role principal, waow 
C'est Ihisloire dun mec soli 
et assez content de son 
etat. II tienl des fiches sur tous 
ses "amis", c'est son sport fa- 
vori. (au cas ou ga interesse- 
rait quelqu'un, chuis siir qu'or 
pourrait lui r'fourguer un Visi- 
ble, ou un autre programme du 
genre, de la thune en perspec- 
tive !) et en plus il est prof 
dans un bahut qui s'appelle 
"Lycee Marylin Monroe" 
un programme. Et manque de 
pot. il tombe amoureux dune 
go nz esse, c'qui (out lout son 
systeme de vie en lair, alors 
qu'il etail regie au quart de poil 
comme I'Hippojoysl (en vente 
dans ce canard), moralite il la 
laisse torn ber, parce qu'il ne 
lienl pas le coup, et Ihisloire 
ne s'arrete pas la, 
reste. on vous en 
quand le film sortira pour de 
bon, c'esl-a-dire en septembre 
prochain. 

Bon, ben voila, le reste d 
longs met rages ne vaul pas 
coup, a pari "Brother", qui sort 
le 10 avnl. et vous en saurez 
plus a c'momenl-la. C 
Salul ! 
CLOU ■■ PIDOUZZZ 



edito 



Euuuuuh. Ah ouais.. L'edito. 
Bon, eh ben on va y aller. 
Ouand faul y aller. laut y aller, 
n'est-ce-pas ? 

Alors. de quoi esl-ce done que 
j'va vous causer ? Des films de 
la s'maine'par exemple. Mais 
le probleme c'esl que je delire 
tenement ces temps-ci que |'ai 
meme plus la place pour vous 
causer des films qui sonl sorti 
mercredi. Deja, vous avez 



cette semaine un box office 
global de tous les films du 
mois. avec en prime le toplO. 
version anglaise de "les 10 
meilleurs films du moment a 
mon avis". Avouez que toplO. 
c'est quand meme plus court. 
Alors voila. comme ca vous 
saurez tout. 

Sinon. j'vous cause encore de 
Chamrousse. memorable festi- 
val, et puis voila c'esl tout. 
Ailez Tchaw I 

CLOU 



BELLE ET LE CLOCHARD 

Dessin anime des Studios Walt Disney 




Dessin anime. 

Avec... person ne, eh, pomme, 
vu qu'e'est un dessin anime. 
1H15. USA. 



Hal hi. hai ho. on revienl du bou- 
lo! ! Ah meeeeerde ! J'm'ai goure 
d'film ' Cekii-la. c'est celui avec 
les debs Nan. pas ceiui-la. lau- 
Ire Ouais c est ca ceiu- avec ie 
mec Chien et la snob chienne 
Entm. iesaisou ie suis ' 
Ah ben. ca l sail pourtant pas tres 
longtemps qu ils en avaient res- 
sorti un de leu's HrOirs les mecs 
de che; Walt Disney : crois b<en 
que elan 'Robin des Bols' meme 
que ' 

Bon Vu la s rrame el ics produc- 
tions precedentes de Walt Disney 
k<- rebatds et les gretfiers (les 
chats pour les mcultes). ca plait 
aux gosses 

- Ah bon Vous men dire; lant. 
comiesse ■ 

■ Mais si Cher ba'on les Arsto 
chats. Les 101 Daimahens. La 
Belle et 'e C'ocnard Antarctica 
Peter Le Chal. Lassie Chien R- 
dele. Fritz The Cat... 



- Mon. non ! pas Fnlz Ze Cal. Qa 
c'est que pour les papas et les 
mammas (pour ceux qu'onl vrai- 
ment beaucoup de culture, y avail 
meme un groupe de zik baba. 
dans lesannees 70). 

- Oh I Je suis confuse, baron, 
commeni [liable, ai-je pu me lais- 
ser induire en erreur de la sorte ? 

- C est voire suimiv qui a repiis le 
dessus Vous eles demasquee. 
comtesse ' Voire mlame turpSodfl 
esl enlin mise au grand ioik ' Je 
ne suis point dupe ' Enleve; ces 
lenti.ies de contad qui vous as- 
sombnssent les yeux ' 

- Damned ' aie ame relaite 1 

• lesse. iou are ' lou ne trompe 
p.ji iobodi ' lou ate en fait In- 
grid-Ahmed Legrand de la Mo'lar- 
difire. ^e lemouss sicrete edieme ! 
Aie have reconnu iou> aksente ! 
Ha I Ha ' And mamtenant ze 
combat final ' 

- Seurteunii nole ' Bicose que 
grace tou ma-iie boude d oretlle 
aul comme pel ichonne ou Qu aie 
have ze bou tonne qui dedenche ze 
fatneul e*pioiionne 



ANTART1CA 

de Koreyoshi KURAHARA 




Avec Ken TAKAKURA. Tsu- 
nehiko WATASE et des 
chiens, et des chiens, et des 
chiens, et plein de neige 
dans tes personnages princl- 
paux. 1H45. JAP. 



Chais plus quel locdu chantait 
"it y a le ciel. le soieii el la 
mer .. ' eh ben le mec it a loul 
faux pour ce lilm : il y a la 
glace li Anta'cliQue geleej les 
chiens et c esl tout 
Ce lilm a fait le plus gros score 
au box-office au Japon Faut 
dire Que Pepws Que les Japs 
oosseni comme des dinques. 
el ca fait un bout d'temps >>s 
ne vont plus au cmoche. el 
pour owls se deptaceni en 
masse pour lous alter voir ie 
meme lilm. taut vraiment Que 
ce soil bien 

Cependanl it y a un prooicmn 
comme lou/ows ie cherche ta 
pule bete tes Japs test des 



mecs qui font loul comme des 
moulons Vous connaissez. 
vous. d'autre pays ou les mecs 
se suicident quand lis n'inle- 
grent pas la tac. qui une lois 
sortis de cette meme lac. font 
une carriere de 25 ou 30 ans 
dans ta meme boite. des mecs 
qui partem en vacances avec 
la boite. avec des fringues 
avec le logo de la boite loul 
partout. des mecs qui sont 
prets a se tuer au boulot pour 
les beaux yeux de leur palron. 
Les kamikazes, vous en avez 
deja enlendu parler. non ? 
El le Him. alors ? 
Des chiens de traineau qui ar- 
rivent a survivre une annee en- 
tiere au Pole Norti. alors quits 
y avaient ete~ taisses par une 
expedition sceniitique qui dut 
se barrer en quatneme Vitesse 
Bon El apres 

Vous vous souvenez de Peter 
le Chat ' C'est ta meme 
chose, vous pouvez y emme- 
ner ia petite soeur ou le petit 
frere qui ne sera pas decu du 
voyage deconncz pas. 4 films 
pour les entants en 6 semav 
nes. ca tail date, laut dire qu rf 
y a 2 "Watt Disney ' dans le lot 
Cost geniit Les mecs se sont 
relates comme des betes pour 
dresser les ctcbards. se sonl 
fait chier ■ a cent sous de 
Iheure en loumant dans des 
conditions ctimatiQucs plus que 
dures 1-40' I et tout ca pour un 
film qui est pas mat. sans plus 
Point 



box office 



1) APRES LA REPETITION 

2) LA NUIT PORTE JARTELLES 

3) PIANOFORTE 

4) SAC DE NOEUDS 

5) THE A LA MENTHE 

6) LOUISE L INSOUMISE 

7) RAS LES PROFS 

8) SOLDIER'S STORY 

9) LA RIVIERE 

10) LES SPECIALtSTES 

11) LE FLIC DE BEVERLY HILLS 

12) ROMANCE DU FRONT 

13) LADYHAWKE 

14) ANTARTICA 

15) LA PETITE FILLE AU TAMBOUR 

16) LES ROIS DU GAG 

17) LE VOYAGE A CYTHERE 

18) FALLING IN LOVE 



TOP 10 



) APRES LA REPETITION 

;) LES FAVORIS DE LA LUNE 

.) BRAZIL 

.) PERIL EN LA DEMEURE 

i) LA VIE DE FAMILLE 

i) LES SAINTS INNOCENTS 

') A LA RECHERCHE DE GARBO 

J) LA NUIT PORTE JARTELLES 

I) PIANOFORTE 

I) ANOTHER COUNTRY 



18/20 
17/20 
17/20 
17/20 
16/20 
16/20 
16/20 
15/20 
15/20 
15/20 



LE FLIC DE BEVERLY HILLS 

de Martin BREST 

cons- 1 a y arnvaient (outre me nt 

Comme que c'est dit dans I'ti- 
ire. c'est Ihisloire dun conde 
(flic). J'veux pas vous dece- 
voir. mais moi les histoires de 
bourre. ga m interesse pas des 
masses Si vous mettez devant 
moi un flic et un voleur. je 
choisis le voleur. 
A part cet avis qui m'esl slric- 
lemenl personnel, comme tout 
le reste de la page d'ailleurs. 
et que si vous etes pas d'ac- 
cord avec c'que j'dis vous avez 
plus qua r'garder les niaiseries 
de France ROCHE a la tele, 
parce quelle, curieusemenl. 
elte aime tous les films . bou- 
avec Eddy MUR- gez pas je r'prends mon soul- 




Avec Eddy MURPHY. Judge 
REINHOLD. Eddy MURPHY, 
John ASHTON, Eddy MUR- 
PHY, Lisa EILBACHER et, 
enfin. Eddy MURPHY. 1H45. 
USA. 



n tout 

petit sur laffiche. e'est-a-dire 
nioins grand que BELMONDO 
quand il sort ses films. Dur. 
pour lui ' 

Eddy MURPHY, c'est le mec 
que loul le monde y dit qu'il 
esl devenu une slar en 2 films. 
Eh ben c'esl meme pas vrai. 
C'est meme pas vrai parce 
que ce mec ca f'sail deja quel- 
ques temps qu'ii passait a la 
tele bans un chaud qu il faisait 
avec John BELUSHI (Dieu ail 
son ame. sa dope et sa shoo- 
teuse). Dan AYKROYD ET 
Eric IDLE (des Monly Python), 
enlre autres delirants II elait 
done bien entoure le pelil salo- 
pard. Le show sap pel ait "Sa- 
turday Night Live", et passait. 
comme son nom I indique toul 
les samedis soirs en direct de 
New-York, tres rares les emis- 
sions en direct aux Slates. Le 
but du jeu c'etail de faire rire 
les gens. Et en plus de ga ces 



fie. le film esl pas mal, 
On voit de bout en boul du film 
Eddy MURPHY, le rigoio de 
service, que c'est un flic de 
Chicago qu'il a pas des manie- 
res de (aire particulierement 
orthodoxes. Son meilleur ami. 
qui lui n'a pas retourne sa 
veste el qu est reste voleur. se 
fait tlinguer sous ses yeux. 
AAARGH ! Enlion et damna- 
fer ! V'la-t-y pas I'MURPHY qui 
monte sur ses 90 chevaux 
garnis de Idle defoncee et qui 
fonce a toute berzingue vers 
Beverly Hills (Los Angeles 
pour les ignares) pret a tout 
pour venger son pole. Et devi- 
nez quoi ? Eh ben a la fin il y 
arrive ! 

Tout I' monde il est content, 
Eddy a fait son numero, on a 
bien ngole pendant 1H45, et 
voila. Sorti d'la salle. il reste 
plus grand chose, mais "chi se 
ne frega ?" (' ) comme y disenl 
les Rilals. 
(■ ) On sen foul ! 



STALINE 

deJeanAVREL 



ROMANCE DU FRONT 

de Piotr TODOROVSKI 




Avec Nikolai BOURLIAEV, 
Natalia ANOREICHENKO 

(boujour lUkrame) et Inna 
TCHOUR1NA 1H30. SOV. 



Aaah ' Un lilm sovietique qui 
ne parte m du parti, ni de ia 
diticuiie de trouvei de la 
boufte. ni de la gkure des 
plans qusnquennaux qui foua- 
rent. m des purges, ni de.. . m 
de Epatant. non ? 
Un film d amour, cesi dans ie 
Hire, "romance" Ou eiie soil du 
front, ga no fait aucun doute. 
mais pour ne oas vous enduire 
deneur. disor.s que cesi la 
quelle na-1 En fait la majeure 
partie de I hisio»e se passe a 
Moscou. quelques annees 
apres 'a guere (la qeumeme 



II y a dans ce film une come- 
dienne super : Natalia AN- 
DREICHENKO. c'esl pas 
parce qu'il y a "andrei" el 
quelle est aussi ukrainienne 
que c'esl la fille de Gromyko 
ou de P'titgervais. 
Elle a un charme fou et elle en 
joue. la maligne 1 Meme que 
y'a surement des mecs du 
Jury de Vallavolid qu'on du 
craquer sur elle. caf elle y a eu 
le Prix d'lnlerpretation Femi- 
nine, quelle partage d'ailleurs 
avec sa compagne. I. TCHOU- 
RINA (chuis pas IraD d'accord 




s). C'est elle que c'est la 
gonzesse que le heros y 
lombe amoureux sur le from, 
on I com p rend ! 
Generalement. ie nsuis pas 



Dans la serie "les films a mes 
sage tendancieux" voici : (rata 
latatala.ling !) STALINE. Ap 
plaudissements. 
Chers amis, amies et amioiier 
tiueryts (c'esl pour les Vegans 
qui sont hermaphrodites), 
vous n'etes pas sans savoir 
que le sieur Josef STALINE ful 
le mail re du plus grand pays 
du monde pendant 30 ans "' 
qu'il fut responsable des plus 
grands massacres de Ihisloire 
comme son copain HITLER, 
c'est pour cette raison qu'il 
comparait aujourd'hui devanl 
LE TRIBUNAL DE L'HIS- 
TOIRE. remission la plus re- 
gardee de la galaxie sur la 
tridi. 

Jean AUREL. notre procureur 
cette semaine. a choisi le "petit 
pere du peuple" comme tete 
de lure, el en plus ya d'quoi 
faire pendant plusieurs semai- 
nes. 

Ah, au fail, j'oubliais. pour tixer 
les idees, je vous rapped e que 
Staline c'est celui avec la 
grosse moustache, celui avec 
la barbiche et un peu chauve 
esl LENINE el celui qua 
aussi une barbiche et qui s'esl 
fail descend re a coups de pio- 
Mexico en 1950 et quel- 
ques. c'esl Leon TROTSKY. 
Staline fut, passez-moi I "ex- 
pression, la pire des ordures. 
Tous les mecs qu'avaient une 
gueule qui lui r'venail pas il les 
zigouillait : les Juifs, les Arme- 
. les Gitans, les Mongols, 
les anciens combattants. les 
generaux. les permanents du 
parti, fes bouchers, les femmes 

horticulleurs, les papes. Ia 
soupe, tous! Dans I'histoire 
plus de 30 millions de mecs 1 
Ouille ! Et en plus de ga il etail 
nul, mais nul, alors 
nuuuuuuuuuul ! Tenement que 
ses fameux plans quinquen- 
naux onl toujours ete fouateux, 
tout faux le mec '. Vous pigez 
comme c'esl cool de faire un 
film qui descende Ie 
non ? Toul le monde 
d'accord, a part quelques 
communistes de la vieille 

Voila. moi j trouve qui s'est pas 
trop fait chier le mec, c'esl tel- 
lemenl facile d'etre anti-coco 
en c'moment. enfin merde, les 
gens onl I'droil d'penser c'qui 
veulent, non ? Bien sur, Aurel 
serait 1'premier a m'dire qu" 
est d'accord, mais c'qui m'inte 
resse, c'esl comment les gens 
vont recevoir son film. Y vont 
s'creuser la cervelle a 
chercher un 2eme degre. c'esl 
tenement facile de faire la col- 
lusion enlre le communisme de 
'epoque et celui d'aujourd'hui, 
es mecs du PC en Italie. 
;omme partout ailleurs, onl 
depuis longtemps laisse tom- 
ber le stalinisme. surtout les 
Ritals el les Espingouins. 
Si vraimenl vous n'avez d'yeux 
que pour votre micro, et que 
vous n'y connaissez rien en 
politique, allez-y. vous y ap- 
prendrez des choses, mais pai 
pi tie. une fois renlres chez 
vous. essayez de trouver un 
peu plus de renseignements, 
hein ! 




trop branche sur les films ro- 
mantals et sentimentiks. mais 
la vraimenl, j'ai fondu. Le 
heros est tenement genlil et 
mignon. II arrive meme a lui 
trouver des fleurs par -35° a 
Moscou, le mec. chapeau ! 
J'vous raconte pas I'hisioire. 
c'esl pas la peine, elle est on 
ne peut plus classique. sauf 
que contrairemenl a ce qu'on 
pourrait penser. les Russes 
aussi sont branches "menage 
a Irois". Je n'vous en dis pas 
plus. Comme quoi I'URSS. ce 
n'esl pas seulement le goulag 
et les horreurs que raconte 
Jean AUREL (voir STALINE) 



tUoche 

EDITO 





(la citrectnce de production) 
(Bombyx) ■ NOOOOOON ! 



- Tu vas le dormer, ton edito ? 



BRAZIL 2 
Vhomme de Rio m 



Film de Philippe de Broca 
(1964) avec JP Belmondo el 
F D'Orleac. 

Beeeeetmondo est un bon 
comedien, ca vous le savez. 
Depuis quelques annees il ne 
nous I'a guere demontre, vous 
le savez egalement. De Broca 
esl un bon realisaleur, vous le 
savez, il ne nous I'a pas 
prouve depuis quelques 
annees lui non plus. Bon sang, 
oil esl passe leur talen! ? Je 
vais emertre une hypothese. A 
mon avis (qui vaut ce qu'ii 
vaut), ils en ont mis une bonne 
partie dans ce film. D'aucuns 
disent "beurk !" des qu'ils en- 
lendenl prononcer le nom de 
Belmondo ou De Broca. Ce a 
quoi je reponds : II ne laul pas 
etre aussi categorique. En effet 
ce film est un bon film. Si si, 
j'insiste. 

L'histoire de depart est assez 
simple. Adrien. militaire. profile 
d'une permission pour venir 
voir sa fiance Agnes (ils sonf 
charmants). Mais voila que 
survient un evenement que ni 
Adrien ni Agnes ni meme 
vous, n'avaient soupconne. 
Agnes, suite a un cambrioiage 
de musee est en levee. Evi- 
demmment super BEBEL revet 
son costume el vote au se- 




cours de sa bien aimee. Tel le 
vengeur non masque (si non 
rien ne nous prouverai! que 
c'est lui). il va poursuivre les 
ravisseurs jusqu'au Bresil -d'ou 
le titre-et plus precisemenl jus- 
qu'a Rio. Avec une foultitude 
de rebondissements en to us 
genres, de cascades plus lol- 
dingues les unes que les 
autres. nos deux heros s'en 
sortiront, non sans une cer- 
taine dose de frayeur. 
Ca c'est de la comedie ! Et de 
la bonne, je vous le garantis. 
Pas casse tete pour deux 
sous, un super moment de de- 
tente. Ce n'est pas un film de 
reference, mais c'esl vraiment 
bien. Malgre une diffusion trop 
frequente. un petit plaisir qui 
ne route rien. 

Diffusion le 7 a 20h3S sur 
TF1. 



i4i 



Iranoff. Buijanoff et Kopalski 
sont charges par le gouverne- 
ment ruskoff d'ecouler a Paris 
des bijoux saisis pendant la re- 
volution. Avec I 'argent recu- 
pere, ils doivent ensuite ache- 
ter des machines agricoles. La 
grande duchesse Swana a qui 
appartenaienl ces bijoux de- 
mande a Leon de les recupe- 
rer. Leon, c'est justement le 
guide parisien des popofs. 
Alerte par la Guepeou. le gou> 
vernement sovietique est pique 
au vit (la guepe est oil) et en- 
voie Ninotchka (Wonder 
Woman) a la rescousse. 
Helas. Super sovietskaia ba- 
bouchka lombe amoureuse de 

Mineur, ce film de Lubitsch. 
compare a celui de la semaine 
derniere. Valable toul de 
meme pour la prestation de 
Garbo. Rendez-vous compte : 
elle rit '. Voila le scoop de la 




vous est offert 
gracieusemenl par votre 
HHHHEBDO. L'histoire de 
cette femme communiste (eh 
oui. encore) vue par les ameri- 
cains est assez interessante, 
surtoul quand on pense que ce 
film est de 1939, c'est a dire a 
la veille de (entree des E.U. 
dans la deuxieme guerre mon- 
diale. De nombreuses coupes 
ont ete taites pour ne pas 
froisser le fulur-ex allie sovieti- 
que. ce qui rend l'histoire un 
peu bancale. Allez. Garbo est 
mode, vive Garbo. 
Diffusion le 5 a 23h00 sur 
A2. 



curiosites 



I CRIME PASSIONNEL « 

Film d'O. PREMINGER (1945) E 
avec Dana Andrews et Linda & 
Darnell. 

paume, Eric, debarque Q_ 
dans un snack-bar pour y de- 
pen ser son dernier dollar. II 
s'eprend de la serve use, 
I Stalls, gagne quelques sous el 
' I'appetit lui venani, seduit la 
I riche tille du maire de la ville 
I qu'il epouse. Ca c'esl la reus- 




Lundi 1 Avril 



20h30 C + 



TYGRA. LA GLACE ET LE FEU (1983). 
film (animation) de R. Bashki dapres les 
dessins de F. Frazelta 
LHEURE DE VERITE avec Robert Ba- 

L'AVARE (povre film avec Louis le Fu- 

neste) 

LA MOUTARDE ME MONTE AU HEZ 

(la mayonnaise ne prend pas) 
21h55 A2 : PETIT THEATRE 
22h20 TF 1 : ETOILES ET TOILES (magazine cine 

branche) 
23h00 FR3 : THALASSA (magazine qui senl I lode) 



20h35 A2 : 
20h35 FR3 . 
20h35 TF1 . 



Mardi 2 Avril 



20h30 C + ; CIRCULEZ Y A RIEN A VOIR (si, Birkin 

et Blanc) 
20h35 FR 3 : DERNIERE SEANCE (voir article) • 
20h35 TF 1 : ENIGMES DU BOUT DU MONDE 
20h35 A2 .' YALTA (reconstilution soignee) 
21h35 TF1 : UN OTAGE, piece avec Sylvie Joly. Si- 

mone Valere et Jean r 
22h00 C + : LA CHEVRE (Beeee) 
22h30 TF 1 : TINTAMARTS (varices) 



Mercredi 3 Avril 



20h30 


TF 1 


20h35 


hH 3 


20h35 


A? 


21h00 


+ 


21h30 


TF1 


22h15 


A2 


22h35 


TF1 



DALLAS 

AGORA:lnsecuri!e dans les villas 
AMOUR DE SABLE (emouvant) 
■ ALAMBRISTA (voir article) Q 
CONTRE-ENQUETE (magazine dmfor- 
mation) 

CINEMA.CINEMAS (LE magazine) 
STATION ARGENTINE (la musique que 
j'aime) 
FEMMES DE PERSONNE (voir curiosi- 



Jeudi 4 Avril 



20h30 C + : TRAHISONS CONJUGALES (1982), 

film dapres une piece de Pinter avec Je- 
remy Irons 

20h35 FR3 : JUDITH THERPAUVE (voir article) D 

20h35 TF 1 ; LE CANON PAISIBLE rf 1 (serie Iran- 
quille) 

20h35 A2 : LE MUR DE LA HAINE (fin) 

21h30 TF1 : INFOVISION 

21h30 A2 .- RESISTANCES: La Theologie de la Li- 
beration 

22h00 C + : LE RAYON BLEU (AAAArrrrgggghhhh) 



Vendredi 5 Avril 



20h35 A2 : CHATEAUVALLON 

20h35 FR 3 ; AGATHA CHRISTIE: Mr BROWN 

20h35 TF 1 ; LE JEU DE LA VERITE avec Sophie 

Marceau 
21h00 C + i LA GRANDE BAGARRE DE DON CA- 

MILLO (pasta) 
21h35 A2 : APOSTROPHES: Ce que pensent les 

pauvres 



21h50 TF 1 


MULTIFOOT 


22h50 FR 3 


DECIBELS DE NUIT 


22h40 C + 


STUNT MAN 


23h00 A2 


NINOTCHKA (voir articlelQ 


Samedi 6 Avril 


20h35 TF 1 


LA CHIENLIT, piece a ch... 


20h35 A2 


CHAMPS ELYSEES 


20h35 FR3 


DISNEY CHANNEL 


22h10 TF 1 


DROIT DE REPONSE 


22h15 A2 


LES ENFANTS DU ROCK: Paul Young 




LIVE 


22h20 FR3 


DYNASTIE 


22h55 C - 


GHOSTKEEPER (1981), lilm (fanlasti- 




que US) enbrume 



Dimanche 7 Avril 



18h00 C + : LA LOI ET LA PAGAILLE (comedie 

americaine) 
20h35 A2 : LE GRAND RAID , 

20h35 TF1 : L'HOMME DE RIO (voir article) VC 
20h35 FR 3 : GASHERBAUM, MONTAGNE DE LU- 

MIERE (documentaire) 
21h00 C + : LE GRAND CARNAVAL (film couscous- 

merguez) 
21h35 A2 : HISTOIRE DUNE CLASSE (reportage) 
22h30 FR 3 ; CRIME PASSIONNEL (voir cunosiles) 



site a lamencame ! Mais Stella 
esl assassinee. Qui la tuee ? 
Diffusion le 7 a 22h30 sur FR 



FEMMES DE PERSONNE 



PI 



Film de C. Frank (1984) avec ■ 
J-L. Trlntignant, Marine Kel- ; ; 
ler, Caroline Collier. Philippe 
Leotard et Fanny Cottencon. 

Trois femmes ires differentes 

deviennent des amies. Leur 

point commun, elles sont inca- Pour les moms de 13 ans. 

pables de retenir et de c'est moins cher ? 

comprendre les hommes. C est 

mieux que I'ANNEE DES ME- 

DUSES et moins bien que JO- Diffusion le 3 a 22h50 sur 

SEPHA, du meme cineaste. C+ 




telocfte- 

LE REVE AMERICAN (' 
alambrista O 



Les mexicains. c'est com me 
les lemmings, periodiquemenl 
ils migrent vers le nord sans 
objectif precis, lis voyagent en 
troupeau de nuit comme de 
jour et ne s'arretant jamais. 
I'instinct quoi. Alors les grin- 
gos, qui detestent etre enva- 
his. leur font la chasse. Depuis 
les derniers massacres de 
bisons et d'indiens. les techni- 
ques se sont perfectionnees 
(intra-rouge. sonar, helicoptere, 
cellule photo-electrique...) mais 
le principe de base reste celui 
de la chasse a la palombe : le 
filet. Avec du barbele et du 
courant electrique mais vous 
connaissez les ricains. ils (ont 
rien comme tout le monde. 



Quelquefois, certains reussis- 
sent a passer en Californie 
comme Raoul Ramirez, le 
heros de cette avenlure. Jeune 
et efflanque. Haoul espere se 
remplumer dans les verts patu- 
rages du nord. Las, le paradis 
n'est pas au rendez-vous. Vio- 
lence, solitude, bas-salaires el 
mauvais t rait e men Is sont le lot 
quotidien des Chicanos. Seule 
une jeune (emelle vient egayer 
son triste sort a la saison des 

Un film militant sur un sujet 
socio-politique. c'est rarissime 
de nos jours. Comme c'est ri- 
cain. il y a surtoul de Taction, 
du sentiment et une pincee 
d 'humour. Done agreable a 
voir. A quand le meme film sur 
la France ? 

Diffusion le 3 a 21h00 sur 
C+ . 



LA LBERTE SODS PRESSE 
Judith Thcrpauvc D 



Film de P. CHEREAU avec 
Slmone S ignore!, Philippe 
Leotard, Robert Manuel, 
Francois Simon et Lazlo 



Judith Therpauve (Simone Si- 
gnoret) vit seule dans une 
grande maison en province. 
Retraitee (et en retrait de la 
societe) elle recoil ses anciens 
compagnons d'armes de la re- 
sistance. (Is viennent lui propo- 
ser la direction du quotidien re- 
gional, cree a la Liberation (de 
singe), dont ils sont aclionnai- 
res. Promue directrice de la 
LIBRE REPUBLIQUE. elle se 
heurte aux vieux macaques de 
la redaction. Pleine d'energie, 
elle confie (de canard) la re- 
daction a un jeune journaliste 
(Bombyx du) Maurier. Les 
ventes remontent un peu mais 
le lancement dun hebdoma- 
dal re graluit. finance par un 
important groupe de presse (a 
raisin) va miner leurs tentati- 
ves (Hersant. ton univers est 
impitoyable). 

Ca se passe en province, mais 
ca ne ressemble pas a Cha- 
teau val Ion. Cette tentative de 




sauvetage dun journal n'est 
qu'un prelexte pour illustrer 
t'itineraire d'un dinosaure de 
(ere post-petainisie. Sortie de 
son sarcophage, Judith qui a 
garde farouchement en elle 
Videalisme de la croix de Lor- 
raine se heurte a une genera- 
tion, a des methodes quelle 
ne romprend pas. Elle aurait 
mieux fait de lancer un journal 
d'intormatique, 

C'est chouette, mais tristounet. 
Diffusion le 4 a 20h35 sur FR 



LA DERNIERE SEANCE 

fW\ HEDREUX QUI COMME LE KING 
] Cfc*- ■ ^ capitaine King # 



Ca se passe en Inde. le heros 
est metis (sa mere elait hin- 
doue, son pere etait un dur). il 
est officier dans I'armee an- 
glaise, et il a pour mission de 
tuer le chef dune tribu rebelle 
qui est un de ses amis d'en- 
tance. Toul de suite, la pre> 
miere idee qui vous vient, 
c'est : CAS DE CONSCIENCE. 
Eh oui, c'est la tout le pro- 
blems du film. Le tuera-t-il ou 
ne le tuera-1-il pas ? That is ze 
question... En plus, il est 
amoureux, le beau militaire et 
son futur beau-papa est raciste 
a un point... (Le Pen. c'est 
Ghandi. a cote). II ne veul pas 
entendre parfer de m adage 
avec un homme qui n'est pas 
100% Lipton. Mais quand le 




King revieni de guerre, beau- 
papa qui n'est pas aussi mau- 
vais bougre que ga. accepte le 
mariage. Alors, d'apres vous il 
a rempii sa mission ? 
Diffusion le 2 a 20M45 sur 
FR3 



ERREUR SDR LA PERSONNE 
le cavalier tiaque 



En gros, c'est l'histoire 
mec qui se trouve au 
endroit au mauvais moment. Y 
a des jours ou tout vous tombe 
dessus et ou vous vous dites 
que vous auriez mieux fait de 
ne pas laisser partir votre pe- 
tite amie et de rester au lit 
avec elle a vous regarder dans 
te blanc des yeux. C'est ce qui 
arrive au heros de ce western. 
II est pris (a tort) pour le 
complice dune bande de hors- 
la-loi. L erreur esl humaine. me 



direz-vous. Mais quand c'est 
toule la ville qui se met (e doigt 
dans I'oeil. il commence a taire 
la gueule. El quand de surcroit 
il est assiege dans le saloon 
de cette ville. et pour le defen- 
dre, il n'y a qu'un sheril. il est 
tout pres de se choper une 
bonne crise de paranoia aigue. 
Mais rassurez-vous, tout ca 
c'est du cinema et ca se ter- 
mine par un mariage. Vous 
avez peut-etre deja vu ca quel- 
que part... i. 

Diffusion le 2 a 23h15 sur 



QA C EST 
DU SERIEUX ! 




MCC 

ET LA GUERRE 

DE SUCCESSION 



Le concours du plus 
grand nombre de titres rln- 
gafds foireux el nuls de I'an- 
nee 1985 est tres bien parti. 
Apres s'etre lance dans la 
commercialisation des logi- 
ciels de Bubble Bus dans 
leur version francisee, MCC 
n'a pas voulu changer de ca- 
tegoric en proposant La 
Guerre de Secession de Lo- 
thlorien. A une epoque je 
croyais bete merit que lors- 
qu'un distributee vendait un 
soft, celui-ci etait fignole et 
debugge meme s'il ne valait 
pas trois clous. Avec cette 
Guerre de Secession MCC 
atteint des sommets jamais 
attaints dans larnaque du 
consommateur. Le jeu serait 
un bon War game si tous les 
choix theoriquement propo- 
ses etaient accessibles au 
joueur. En pratique il n'en est 
rien: la saisie des comman- 
des est complete mem plan- 
tee, les graphismes sont 
rates, la presentation nulle... 
Je vous donne un example 
simple: vous avez le choix 
enlre infanterie, cavalerie et 
artlllerie (jusqu'a concur- 
rence de vingt unites sur le 
terrain). Si vous desire; se- 
lectionner huit unites d'artille- 
rie, le sot! comprend et affi- 
che DEUX unites, si vous 



voulez sept groupes d'lnfan- 
teries vous ne les obtiendrez 
jamais . I'ordinateur ne 
connaissanl pas le chitfre 7. 




Comment voulez-vous jouer 
dans ces conditions ? 
Comment pouvez-vous ne 
pas en vouloir a MCC de dis- 
tribuer un produit pareil, 
d'autant plus qu'M manque un 
element essentiel dans la 
boite: le mode d'emploi. Brel, 
jusqu'a present MCC detient 
la pal me de la nullite avec ce 
soft et je me demande qui 
tentera de lui reprendre le 
flambeau avant la fin de I'an- 



DES VIEILLES 
NOUVEAUTES 

US Gold, qui possede un des 
catalogues les plus allechants 
qui soient en ma tie re de logi- 
ciels an nonce la sortie de nou- 
velles nouveautes toules re- 
cenles jamais vues pour 
Spectrum. Amstrad et MSX ; 
les anciens vieux deja connus 
depasses logiciels qui' existent 
deja pour C8M 64 vonl elre 
adaptes pour ces machines. A 
Conart le barbate deja sorli sur 
CBM. viendront bien tot sajou- 
Exodus. Ultima III. Solo 
flight. Raid over Moscow, 
Bruce Lee et Dambusters. 
Ne quittez pas I J'ai pas fini. 
US Gold, qui est americain 
iu le nom) vienl d entamer 
proces a G8 Gold, qui est 
anglais (dou le nom). Le logo 
et le lettrage de ce dernier se- 
raient nop similaires a ceux du 
premier. Le direcleur de G8 
Gold esi vraimenl desole. il ne 
pensait pas que ca pouvatt 
embeter le direcleur de US 
Gold. II esl assigne en justice 
quand meme. sulfit pas d'etre 
desole. mon pti vieux. 




Suite de la page 2B 
Tramolo est secoue d un grand 
rire qui decouvre ses dents du 
bonheur : jaunes et ecartees. 
- Ouand j'ai quitte Commodeur. 
tout le monde me croyait loutu. 
Lessive. Raye de la carte des 
grands patrons et exclu de la 
Jel Society. C'etail sans comp- 
ter sur le flair de ce vieux Jack 
On dil que je suis lou et prelen- 
tieux. Pourtant j'ai rachete Atrahi 
et mis la moitie du personnel a 
la porte. Aujourd'hui. je peux 
faire la pluie et le beau temps 
dans le monde de t'inlormaiique. 
Mais j'en veux plus II me laul 
TOUT el ecraser toul le monde. 



■ Jack, j'ai omis de vous donner 
un petit detail... 

J'ouvre ma veste. et j en extirpe 
le Washing- Machine- Post que je 
lui tends. 

■ Steve Jobard et Clrve Sans- 
cierc sont egalemeni impliques 
dans cette affaire... 

Son oeil vire du noir sombre au 
violace prolond vaguement 
leinte dun rouge sanglanl. 
- Ouoi ? Mes deux principaux ri- 
ll attrape le hochel qui traine 
loujours pres de lui. le fail tour- 
noyer au dessus de sa tele, le 
jelte conlre le mur et se met a 
bra i Iter : 
-Raison de plus oour 




Joignant le gesle a la parole, il 
applatil brusquement son cigare 
sur une boite de Lego. 
- J'ecraserai aussi les mauviet- 

mon chemin ' Pepe Louis, je 
suis voire homme. Je vous aide- 
rai a trouver I'Ombre Verte et 
j humilierai publiquement Harry 
Kong !! 



Je me saisis de son telephone 
en plaslique. J'appelle Steve Jo- 
bard chez Appoil. Ma visile la 
convaincu Rendez-vous esl pns 
dans deux heures a laeroport 
de Los Angeles pour le plus 
elrange voyage de ma vie... 
|Ne manquez pas le prochain 
episode: VOL 747 POUR 
GARGES-LES-GONESSES !■)" 



Suite de la page f ^^^^^ 

Mais, et voila loptimisme qui vient. 
si Jack Tramiel a pu rachete Atari 
avec son trie et sartout celui des 
banques. il n*y a aucune raison 
pour que Jean-Louis Gassee ne 
fasse pas la meme chose avec ses 
economies el la Caisse la oil esl 
I'Ecureuil. A moins que la Regie a 
Calcul 

Le remake du T199 de Texas est 



Suite de la page 1 

LE COUP DU PETIT 

Aujourd'hui. IBM nous fail le coup 
habituel : 'Tout compte fait, on ar- 
rete, on reviendra peut-etre un de 
ces quatre" Comme un petit, 
comme un tabricant d'ordinateur- 
bo ul- de- ficelle ! La home ! 

GOUROUS GOURES 

Si meme IBM prend des baffes 
dans la gueule. oil va-t-on. je vous 
le demande ? 

Est-il possible que la micra-informa- 
tique tamiliale ne soil qu une vue de 
I'espril ? Eshl possible que le 
grand public ne soit pas d'accord 
pour se miner en achetant une ma- 
chine dont personne n'a encore 
trouve I'ulilite a la maison ? Est-il 
possible que les micros ninleres- 
sen! que les hobbistes program- 
meurs. les joueuis zimbamboum et 
les chefs pedagogues ? Esl-il possi- 
ble que les grands gourous du mar- 
keting se soient goures ? 
Qui. oui. qui et oui 
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George MEURISSE et son CANON X07 vont remplacer efficacement votre vieille calculatrice usee. 



RECTIFICATIF VAQ : Monsieur 
Roland HUBERT nous fail part 
des ameliorations suivantes 
pour son programme V.A.O. 

350 GOTO 300 

3051 IF KMC126 THEN GOSUB 7000 EL5E GOSU 



11B1 IF QQOe THEN Krt=QQ:OQ=0 

1115 co-cute en 1070 

aaas corvne en 1370 

2055 cotme en 1070 

2100 ausnt GOTO 1050 inserer QQ=KM:Krl=CH 



3130 suociri-ner if Inkey* et la suite 
3150 cette 1 igne orenct te nu-nero 3190 

3160 IF R*=CHR$(13i THEN 3201 

4029 cowne en 1070 

4030 GOSUB 3190 lau lieu Oe 3150) 
4Q3S comite en 1070 

£001 IF I NSTR < V* .BV* 1 2 ,VF 1 J =0 THEN 6010 
Eir\ 6005.6006.6007 nettre GOTO 6100 au li 

eu oe 6150 




MATHEMATIQUES sur CANON X- 07 



SUITE DUN' 75 



6390 OtB-A! /2: F0RI-0T05:X-C#Z ( I J ♦ 

OA:E-FNF(X) :X-2*(C+A)-X 

6600 D-D+U(I)*(FNF(X)+E> : NEXT 1 : D-D 

*C 

6610 PHINT" I = "! INTI .5 + D-HE8) /1E8:G 

OT06510 

£620 IFAS-'I'THENA— B 

6630 D-0:F0RI*>0T05:X-2/ 11+2(1) ) +A- 

6635 IFA«-" I 'THENF-FNF l-X> ELSEF-FN 

FIX) 

6640 E-UID/I (1*2(11 l*li+Z(Ill)*F: 

X-2/(l-Z(I) )*A-1 

664S IFA«-' I "THENF-FNF (-X) ELSEF-FN 

FIX) 

6650 B-W (11/1(1 -Z(I))#(1-Z (III) #F+ 

E+D: Z :D-2*D 

6660 PRINT" I-*| INT ( . 5+D+1E8) /1ES:G 

OT06510 

6700 INPUT'KethOde B* NEWTON on 

da Dichiituni* (1-2)*|A 
6703 DIMR(l) :DIMR*(1) : IFA-1THEN670 
8ELSE6850 

£708 0NERROR8OTO6840 
6710 INPUT'Orlgine I" I V: INPUT" Inte 
rveiie :"iw:a-ie-8 

£720 G-U:F-V 

6730 G-G-U:C-G:G0TO6750 

6740 C-G 

£730 GOSUB6900 

6733 F-F+W:C-F:GaSUB£800:G0T067S0 

6800 Y-FNF(C) : X-A*C: B-FNF (X) :D-CJC 

-D-A*Y/ tB-Y) 

6810 IFABS(S-C) >-lER9THEN6800 

6820 PRINT'Sohilion : " I INT ( . 5+CS1E 

9) /1E9:GOSUB900 

603O RETURN 

£840 U-INT(RND(1>*2> : IFU-OTHENRESU 

ME6730ELSERESUME6735 

6830 PRINTInttruallp { a , b ] • : INPUT 

*a-*(A:lNPUT"b-"!B 

6835 F-FNF(A) : IFF-0TKEN6890 

6865 G-FNF(B) :IFG-0THEN£B90 

£870 Y-X:X-(A+B) /2: IFABS t Y-X) < 1E-1 

1THEN6890 

6873 H-FNF IX) : IFH-0N6890ELSEIFG*H< 

OTHENA-X 

6880 IFF*H<OTHENB-X 

68S5 GOT06870 

m= i : r ( i ) =x: gosubiooo 

£895 PRINT"«--*R»(1) : GOSUB9O0: GOTO 

6850 

7000 PRINT" t"+CHR»t 246) ♦", "+-CHR«I2 

42)+*] -> a+ib" 

7010 PRINTCHRSI246)*'-*! ! INPUTP 

7020 PRINTCHR«C242)+'«"+CHR»t247) ♦ 

**c/d": INPUT-c,d*tC,D 

7030 M-Z:T"C*PI/D:R(I)-C0S(T)*P:R( 

Z)=SINIT)*P 

7040 GOSUBIOOO 

7050 PRINT**-* + R»U)*"*i ( ■*R«(2> + " 

) ':G0T07010 

7300 INPUT" (x+y)"n ou (x-y)"n (1 

-2)"IA7510 INPUT'de^re n:'|N:G0SUB 

7600 



7320 IFA-2THEN7350 

7330 PRINT" (x+y)""|NI "-" :FORI-0T0N 

7533 PRINTAlI,N)l"#(x-"IN-I|"Uy*" 

(It ")+';G0SUB900 

7540 NEXTl:PRINT0:G0TO100 

7330 PRINT- U-yl'-'INI "-• 

7555 FORI-OTON 

7560 PRINTA(I,NI*(-1>"I| "*tx"*lN-I 

I ■) (y""ll| ")+":GOSUB900 

7570 nexti ! pr into : g0sub9001 got0100 

7600 dimain.n+1 > :f0rj-otqn:a(0, j>- 

i:nextj:aii,i>-i 

7610 fori-1ton:forj-1ton+1:a(i, j)» 

A(I-1,J-1)+A(I, J-l) 

7620 NEXTJ, I : RETURN 

8000 INPUi-Rfsolutiun da lyltl-iin 

, Determinant: " I A* 

8010 IFAS-*R"THENB100 

8020 IFA*-"D"THENB500 

8030 80T08000 

8100 PRINT-Syate-e d ' squat ionm' : IN 

PUT'Nonbre d'lncnnnuiiI-IN 

8110 DIHA(N+1,N> ,S(N«1,N) ,B(N) ,X(N 

) 

8120 FORI-1TON:FORJ-1TG)N 

BISO PRINT"a(*| I| -, -] J| -)-■• 

8140 INPUTAd, J) fQ<I,J)-0 

8130 IFI-JTHENHII, J)-l 

8160 NEXTJ: NEXT I :CLS 

8170 F0RI=1T0N: PRINT 'b< - i I \ ")**|il 

NPUTB(I) 

8180 NEXTI 

B190 F0RK-1T0N 

8Z00 IFA(K,K)-OTHENC-0 

8203 IFA(K,K)-OTHENG0T0833O 

8210 D-A(K,K) 

B220 F0RJ-1T0N:A(K,J)-A(K, J)/D:8CK 

,J)-8(K, 3) /d:nextj 

B230 FORI-ITON 

8240 IFI-KTHEN8300 

B250 E-A(I,K) 

8260 FORJ-HN 

8270 A(I,J)-A(I,J)-E#A(K,J» 

82B0 S!I,J)-G(I,J|-E*B(K,J) 

8290 NEXTJ 

83O0 NEXTI 

8310 NEXTK 

8320 G0T0B430 

8330 c-c+i:forj-iton 

8340 AIN+1, J)-A(K,J) 
8330 QIN+1, J)-Q(K, J) 
8360 NEXTJ 

8370 FORL-KlN!FORJ-IT0N 
8380 AIL, J)-A(L+1, J) 
8262 Q(L, J>-S(L+1, J) 

8400 nextj:nextl 

8410 ifc<-n-ktheng0t0b205 

8420 PRINT'PAS da SOLUTION* : END 

B430 fori-iton:x(i>-o:forj-iton:x( 

1 1 -X ( 1 1 *8 < I , J ) *B ( J ) : NEXTJ 

8440 PRINT"x("| I) ">■■ JXtl) : SOSUB90 

0: NEXTI : END 

8300 INPUT"Nonbre da ligncs *|L:DI 

NRtL.L.1 

8503 FORI -1T0L: FOR J-l TOL ! PR INT "il" 

UI","UI")--1 SINPUTRd, J) 

8315 NEXTJ, l:F0RB-LT02STEP-I 

8320 T-R(8,Q) : IFT»OTHENPRINT* impoa 

*ible":GDT01O0 

B5Z5 F0RI-1T0B-1:E-R(I,8) /T:F0RJ=1 

tog :rii,J)>=R(I,J) -e*r ( a, j i 



8330 NEXTJ, X,8:D-Rfl, I) : F0RI-2T01.: 

D-D*R(I,I>:NEXTI 

8533 PRINT'Determinant :*|INT(S*1E 

8+.5>/lE8:GOSUB900:GOT0100 

9000 INPUT "Factorial le, Ar range-nan 

t, Combination" !A« 

9010 IFA»-"F"THEN91O0 

9020 IFA*-'A'THEN9200 

9030 IFA«-*C"THEN9300 

9040 GOT09000 

9100 INPUT'factorielle da"|N:IF(N< 

0)0R(NOINT(N) ) THFN9100 

9110 IFN>48THEN9130 

9120 f-i:fori-iton:f-f*i: nexti :pri 

ntn[ " '-*if:got09100 

9130 s-o:fori-iton:s-s+log(d :next 

I: Y-S/L0GI10) 

9140 IFY>BTHEN9160 

9150 PRINTINT(10"Y)iGOT09100 

9160 PRINTlO'CY-iNTtY) ) 1 "E*"| INT(Y 

) :G0T09100 

9200 PRINT'Arrangenent A(p,n)*!INP 

UT"p-" IP: INPUT" n-"[N:F-l 

9205 IFP-NTHENT-P1F-N:GOT09230 

9210 ifp>n0rp< >int (p)0rn< >int (n) th 
en92009215 t-p: ifn-p+1thenp-0 
9220 fori-p+iton:f-f*i:nexti 
9230 print*a( "!t| *, "in| ")-"|f:g0t0 

9200 

9300 PRINT " Comb i nai ion ■: INPUT *p-"| 

P:lNPUT*n-*JN 

9310 IFP>N0RP n >INT(P)0RNOINT(N)T 



9320 IFP-OTHENY-l:G0T09370 

9330 S-O:F0RI-lT0P:S-S+LO6( (N-IQ1) 

/I) : NEXTI 

9340 Y=S/L0G(10) 

9350 IFY>8N9370 

9360 PRINT*C(*1P( *,*INC)-*|INT(.5 

+10-Y) IGOT09300 

9370 PRINT"C(-)P[ ', *|N! ")=*I10"(Y- 

INT(Y) ) I "E+"IINT(Y) 

9380 GOT09300 

9400 INPUT -Fraction, Numbre pra-nla 

r , Expoimt, ppcm dpgcd " ; AS 

9405 IFA»-*F"THEN9440 

9410 IFAS-*E'THEN9460 

9415 IFAS-"P"THEN94B0 

9420 IFA«-*N"THEN9520 

9425 G0TO1OO 

9440 M-l:BIMR(l) :DIMR»(I) 

9317 INPUT"n-"[R(l) : GOSUBIOOO: PRIN 

T"n-*+R»H( 

9450 G0T09445 

9460 PRINT"S-x"n": INPUT *x-")X: INPU 

T " n- " | N : Y-N#L0G ( X ) /LOG ( 10 ) 

9465 IFY< 50THENPRINTX"N: G0T09460 

9470 PRINT10"1Y-INT(Y) ) t "E*"l INTIY 

) :GOSUB900:GOT094£O 

9480 INPUT" a-* [A: INPUT "to-* | b: N-b: P 

-A 

9482 IFA*B< 

9485 Q. 

500 

9490 N-P1P' 

9300 PRINT 

C.Wi -*tA*B 

9520 DIMR 

9321 FORI- 
9522 DATA2 
9323 FORI: 



'R:G0TO9485 

p.g.c.d »■ iP:PRlNT"p.p. 

P: G0SUB900: G0T094B0 
0) ,0110) 

T010:READR(I) : NEXT I 
3,5,7,11, 13,17, 19,23,29 

T09:READD(I) : NEXTI: data 






-1, 1,11,13,23,7,17, 19,29 

9324 INPUT*n-*|N:PRINT"n-I*i:lFN-0 
THENPRINT'01 " : B0T09524 

9325 IFN<0THENPRINT"-1*"| : N— N 
9331 FORI-1T010 

9532 IFN/R(I)-INT(N/R(I) 1THENPRINT 

R ( 1 ) "*■ I :N-N/R ( I ) EG0TO9332 

9330 NEXTI : F0RI-30T0SBR (N) +1STEP30 

:F0RJ-IT09 

9560 D-N-f I + D(J> HINT(N/Ii<DU))l 

9365 IFD-OTHENPRINTI+DIJ) I **"( : N-N 

/(I+DIJ) :G0T09560: NEXTJ 

96S0 NEXTI:PRINTN| "]*:GOSUB900:G0T 

09524 

9B00 INPUT-Variable 

9805 IFA-1THEN9820 

9810 IFA-2THEN9900 

9815 GOT040O 

9B20 INPUT"»*-f»cti* : "IN:IFN<20RN< 

>INT(N1THEN9820 

9825 DIMX(N) :FORI-1TON 

9830 PRINT*Ml-|Il')-*|IINPUTX(I):N 

EXT I 

9833 PRINT-Etud* d* x(a) a x(b)":I 

NPUT"a-"|A: INPUT"b-"IB 

9B40 IFA>B0RAOINT(A)0RA<00RB<00RB 

OINTIB1THEN9B35 

9845 E-B-A+l:5-0:C-0:F0RI-ATOB:S-S 

♦xii) :c-c+x(i)*xti) 

9B49 NEXTl:PRINT"E++act if :*1E 

9B50 PRINT-Hoyenne I * I INT ( . 5*S*1E5 

/E)/1E5:GOSUB900 

9855 y-(C/E)-(S*S/E/E) : PRINT 'War la 

nca : "1INT1V*1E4*.5) /1E4 

9839 V-SBRIV) I W=INT [V41E4+.51 /1E4 

9860 GGSUB900:PRINT"Ecart-type :"l 

U:GOSUB900 

9865 INPUT'liste des variable :*IA 
*; IFA*-"0"THEN9B67 

9866 60T09870 

9B67 FORI -ITON! PRINT " k ( * | 1 1 *)-"|XI 

I) :GOSUB900: NEXTI 

9870 B0T09B35 

9900 INPUT"E*+ecti+ : * (N: IFN<0ORN< 

>INT(N)THEN9900 

9905 F0RIIlTON:PRINT"xI"l I| *)-"I ! I 

NPUTX 

9910 PRINT-y(-[I| •)-■! : INPUTY 

9913 s=s+x:t-t*x*x:u-U8y:v=v+y*y:w 
=w+x*y: NEXTI 

9915 PRINT'Mbyanne x : " I INT t . 5 + S#lE 
4/N) /1E4 

9923 PRINT"MDyanna y : " | INT 1 . 5*U»1E 
4/N) / 1 E4 : GOSUB900 

9930 ux=t/n-s*s/n/n:yy=u/n-u*utn/n 
:cov=w/n-u#s/n/n 

9935 PRINT-Variance x:"IINT(UX# 
♦.51/1E4 

9940 PRINT-Variance y!"iINT(UY* 
+.5) /1E4:GOSUB900 
9945 PRINT'Covariance ( x', ; 
(C0U*1E4+ . b) /1E4:G0SUB900 
9950 PRINT'Coatticiant da 
ian : - I INT(.S + C0v*lE4/SSR(vX' 



1E4 

9955 < 



CDW\ 



81 (U-A*S) /N! A-l 
1E4+.S) /1E4:B-INT(B*1E4+.51 

9959 GOSUB900 

9960 PRINT'Droite d ' aj uatemant 
PRINT*y-"lAi "*x+"IB:G0SUB900:GC 
00 
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Formation a I'assembleur 



COURS D'ASSEMBLEUR 



Depuis plusieurs semaines, 
vous profitez d'un couts d'as- 
sembleur decompose en deux 
parties essentielles (I'une theori- 
que, I'autre pratique). 

Cells semaine le Z80 du ZX 81 
en prend plein la memoirs. La 
semaine prochaine ce sera le 
tour du 6502 de I'ORIC. 



N°55— ZX81 

N° 56 — ZX 81 

N° 57 -- ORIC 1 , ATMOS 



N°61 
N°62 
N°63 
N°64 
N°65 
N°66 
N°67 
N°68 
N°69 
N"70- 
N°71 ■ 
N°72- 
N°73- 
N°74- 
N°75- 
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. T07, T07 70 

. COMMODORE 64 



Cette (ois-ci. nous atteignons un 
niveau praticable par n'importe 
quel lype de machine: en eftel. 
la serie d'aclions a accomplir est 
sequentielle. A aucun moment 
on ne demande au calculateur 
de pratiquer deux operations si- 
multanees. Nous pouvons consi- 
derer d'ailleurs que nous veneris 
d'ecrire un programme parfaite- 
ment executable par une ma- 
chine. 



L'ordinateur, lei que nous le pra- 
tiquons a noire niveau (micro-in- 
tormalique personnelle ou pro- 
fessionnelle) nest, en fail qu'une 
machine de traitement sequen- 
tial a programmes enregi sires. 
Les capaciles d'un ordinateur se 
jugenl par rapport au nombre de 
bits qu'il peul traitor d'un bloc. 
Nous avons deja vu pourquoi 
les ordinate urs ulilisaient une 
base de huit bits. Ainsi. dans 
'escalade a la puissance de cai- 
:u) esf-on passe des proces- 
ieurs a huil, puis seize, trente 
deux el me me soixante qualre 
bils. Cette dimension que nous 
donnons en bits s'appelle aussi 
la "taille dun mot machine". 
Nous pouvons imaginer un ordi- 
nateur sous la torme dun centre 
de traitement des calculs en 
communication avec deux 
autres zones, non moins essen- 
tielles. la me moire et les regis- 



cyL 
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Nous pourrions representer, 
d'une maniere plus que sim- 
pliste, un ordinate ur sous la 
forme suivante: 



//' 



H 



Vous voyez (ensemble des in- 
terconnexions entre les trois ele- 
ments vi tan x de l'ordinateur. 
Mais, pour compliquer encore la 
tache du concepteur d'ordina- 
teur, il faut tenir compte des fac- 
teurs temps dans la communica- 
tion entre ces differentes zones. 
Nous n'allons pas nous abrutir 
avec des chiffres, mais simple- 
ment considerer des qualificatifs. 

Avant cela. precisons que les 
temps de communication que 
nous a I Ions regarder concernent 
ia circulation des informations 
entre le bloc de calcul (micro- 
processeur) d'une part et to us 
les organ es de memorisation 
d'autre part. 

Registre (eleclranique): extreme- 
ment rapide 

Memoire interne (non eleclroni- 
que): ties rapide 
Disque: lent 

Bande magnetique: lies lent 
Terminal: extremement lent 




qui peut etre raccorde a un ordi- 
nateur, mais je liens a fixer des 
points de repere dans lechelle 
des vitesses de travail des diffe- 
rent elements d'un ordinate ur. 

Nous alions mainlenant nous at- 
taquer au chapitre le plus impor- 
tant de ce cours, qui conceme 
I 'organisation materielle et logi- 
cielle des differenis elements 
que nous avons pu etudier jus- 
qu'a present. 

Nous pourrions imaginer de pla- 
cer ces differenis elements dans 
une bofle. de remuer et de bran- 
cher pour voir si nous avons 
construit ainsi un ordinateur, 
mais comme nous I 'avons vu 
precedemment. la logique de la 
conception inlormaiique conduit 
a agir d'une maniere plus ration- 
nelle. 

Nous savons jusqu'a present fa- 
briquer un registre et d'autres 
circuits de memorisation. Reste 
a savoir comment gerer ces es- 
paces de memoire. Nous alions, 
pour r^soudre ce probleme, (aire 
appel a nos souvenirs du debul 
de ce cours. 

Une case memoire designe sort 
le conlenant soil ie contenu, ce 
qui maintienl un certain flou sur 
ce qu'esl cette case memoire. 
De par noire esprit cartesien, 
nous nous devons de supprimer 
cette ambiguite. La case me- 
moire est une boite. d'ou nous 
pouvons deduire subtilement 
que c'est le contenant. Chacune 
des cases memoire dun ordina- 
teur possede un numero diffe- 
rent de toutes les autres cases 
memoire de ce meme ordina- 
teur. Ce numero se nomme 
de la case memoire. 



Mainlenant que nous avons une 
idee precise de ce quest la 
boite, ouvrons-la pour baptiser 
ce que nous y trouverons. A I'in- 
terieur de chaque case me- 
moire, nous trauvons une serie 
de chiffres binaires que nous 
appellerons dorenavanl Infor- 
mation. Le nombre de ces chif- 
fres est fonciion de la capacite 
de base de l'ordinateur. Ainsi 
lorsque Ton parie d'un seize 
bits, il s'agit d'un ordinateur 
dont chaque case memoire 
contient une information sous la 
lorme de groupes de seize chif- 
fres binaires ou seize bits. 
Compte tenu des micros sur les- 
quels nous travail Ions, nous 
considererons (par un abus reel, 
mais aussi par com mod He) 
qu'une case memoire contient 
un octet, soil huit bits. 

Reprenons le cours general de 
noire pensee. Nous avons ac- 
tuellement une pile de boites. 
numerotees. Nous voulons, bien 
entendu, utiliser une machine de 
capaciles raisonnables. Nous 
aurons done 64 Kilo-octets de 
memoire a gerer. ce qui signifie 
que nous alions avoir 65.536 
adresses differentes parmi les- 
quelles nous devrons alter du 
premier coup et sans erreur ex- 
traire reformation que nous de- 
sirons. Le codage d'adresse est 
done un exercice de style parti- 
culierement interessant, dans la 



mesure ou nous devons pouvoir 
acceder a n'importe quelle case 
dans un minimum de temps et 
de bits (si possible) pour recon- 
naitre cette case. 

La premiere idee consisterait a 
numerate r betement chaque 
case. Nous aurions alors a mo- 
biliser 16 bits (2 116 = 65536 = 
64 Ko) et a parcourir toutes les 
boites jusqu'a trouver celle qui 
nous interesse (cette solution 
demande une mobilisation tem- 
poral re du micro-processeur 
beau coup trap longue). Une 
autre idee con siste rail a dire 
que I' on peut effecfuer un pre- 
mier Iri avant de s'attaquer a la 
recherche de la case elle-meme. 
Le fait de decomposer la recher- 
che ne nous permettra pas de 
"gagner des bits, " mais elle rac- 
courcit le temps de recherche 
de maniere considerable. L'idee 
de differentes pages vienl de la. 
Nous alions voir comment on 
aboutil a ce resuttal. 

Prenons une memoire de 1 Ko. 
Nous avons 1024 adresses dif- 
ferentes a gerer. nous aurons 
done bosom de 10 bits (2 i 10 - 
1024) pour les representer 
toutes. Les adresses irpnt done 
de 00 0000 0000 jusqu'a 
11.1111 1111 Imaginons que 
nous voulons mettre plusieurs 
memoires de 1 Ko cotea-cote. 
par exemple quatre. Pour trou- 
ver la bonne case memoire. 
nous alions cheraher dans la- 
queiie des qualre memoires elle 
se situe (done nous devons sa- 
voir compter de a 3) puis 
chercher la case dans la me- 
moire de i Ko. ce que nous 
savons faire avec dix bits Pour 
compter de a 3, il nous suffit 
de nous servir de deux bits. Fai- 
sons les compte s : deux bits 
pour reconnaitre la bonne me- 
moire (ou la bonne page) et dlx 
bits pour rettouver la case me- 
moire dans la memoire 

AUHtSSAGE SUR DOUZE 
BITS AVEC CODAGE DES 
PAGES SUR DEUX BITS 

Ill 



Revenons a notre micro hypo- 
thelique de 64 Ko. Nous savons 
coder une adresse sur dix bits, 
pour la reconnaitre parmi 1024 
de ses consoeurs. I! va done 
nous falloir coder soixante qua- 
tre pages differentes. Pour avoir 
64 codes differenis nous avons 
besoin de six bits (2 t 6 = 64). 
Nous alions done obtenir un co- 
dage sur seize bits (tout comme 
si nous adressions directement 
chaque case) doni six seront 
consacres a la reconnaissance 
de la page. 

ADRESSAGE SUR SEIZE BITS 
AVEC CODAGE DES PAGES 
SUR SIX BITS 




L'ASSEMBLEUR PRATIQUE 

Langage machine ...sur zx 81 




A vos cahiers s'il vous plait ! 
Langage machine sur ZX81 . 
Hebdogiciel n° 71. Vous avez 
tous devant vous le petit listing 
de votre premier programme 
d 'assemblage. Nous alions, a 
partir de cette trams, introduire 
quelques variantes : transformer 
notre inversion video totale sn 
inversion partielle, utiliser notre 
savoir pour creer une fonction 
CLS ultra-rapide etc... Mais que 
pour I'ecriture de ces modifica- 
tions puisse s'imposer a voire 
esprit comme une evidence, pa- 
rachsvons voire intronisation en 
examinant ensemble le pro- 
gramme deja realise, d'abord 
sous Tangle de sa structure, en- 
suite sous celui de son fonction- 
nement dynamique. Ces deux 
aspscts bien assi miles il ne me 
rest era plus qua laisser un 
blanc sur ces colonnes ou vous 
pourrez ecrire vous-meme, d'un 
premier jel et sans rature, les 
variantes envisagees et, pour- 
quoi pas, eel les que vous imagi- 



PrinciDe general qui s applique a 
tout langage et preside a toute 
oeuvre de programmation : la 
si ructu ration Le programme 
s applique a isoier des modules 
de traitement dont le fonction- 
nemeni se veut aulonome et le 
champ dacoon delibersment li- 
mits Dans nos listings chaque 
module est annonce par son 
litre figurant (ZX AS oblige) 
apres une instruction REM sui- 
vie dune astensqus. Le module 
d' initialisation commence par re- 
mettre les pendules a I heure. 
c'esi-a-dire positionner les poin- 
ters (sur ie fichier daffichage) 
et initialiser les compteurs (le 
compteur de lignes). 
Vienl ensuite Ie moteur du sys- 
tem e qui va permettre la lecture 
case par case, ie bslayage du 
FA Sa soupape : un CP 1 18 
qui ovitera les fins de iigne El 
pour finir Is module d inversion 
video quon utilise chaque fois 
qu'il est necessaire. Eh oui ! 
Plus c'est carr£ mieux c'est, Et 
comme dit le poete : "vous qui 
rentrsz ici perdez loute ambi- 
guits". Extirpez de votre pensee 
tout flou artistique, toute confu- 
sion poetique. Vous n'en reve- 
rsz que mieux une fois l'ordina- 
teur eteint... 

Si le programme est clairement 
structure il est alors aise d'en 
comprendre le fonctionnement 
dynamique. Contact I Initialisa- 
tions et le moteur ss mst en 
route. Grace a la premiere incre- 
mentation il saute d'emblse la 
case 118 qui ouvre le F.A. 
S'emparant du premier carac- 
tsre affichs dont la comparaison 
avec 118 s'avsre negative, il 
passe au module d'inversion 
video. Celui-ci calcule le nou- 
veau code et se charge de I'affi- 
cher a i'ecran a la place de lan- 
cien code puis redonne la main 
au moteur qui fait un tour de 
roue supplemental (INC HL) et 
ainsi de suite... jusqu'a la fin de 
Iigne ou la comparaison avec 
118 s'avere positive cette fois. II 
ne se passe alors Men d'autre 
que la decrementation du regis- 
tre B qui accusera encore 23 



lignes a inverser, el un nouveau 
tour de roue (INC HL) qui per- 
mettra d'atteindre la premiere 
case de la deuxieme Iigne. Et 
ainsi de suite jusqu'a lultime de- 
crementation de B par quoi 
5' ache vera Tin version video de 
la vingt quatrieme Iigne. Le pro- 
gramme poursuivanl alors se- 
quentiellement se jette tout droit 
sur ('instruction RET. Finis le trip 
machine, c'sst la descente au 
basic qui commence... Pour 
vous aussi je I'espere les 
choses se sont inversees : 
e'eiait obscur. c'est devenu plus 
clair. 

Nous n'en rssterons pas la ! Vos 
brillantes lacultes de compre- 
hension n'en finisssnt pas de 
metonner. je soumets done a 
votre psrspicacite programmati- 
que le probleme suivant qui ne 
cessa de hanter mes nulls jus- 
que vers ma onzisms annee : 
comment transformer ce sys- 
t6me d'inversion video globale 
en un traitement plus seleclif de 
la surface de I'ecran. a savoir 
n'inverser la video qua I'endroit 
precis ou un message s'affiche 
et cette fois ne plus toucher aux 
Wanes . Hugh I.. J'ai dit. Mais 
cost vous qui allez turner. 

Au qualneme lop deux laborieu- 
ses heures se seront precise- 
ment ecoulees justifiant a mes 
yeux quo |0 vous livre sans pu- 
deur I'une des plus curieuses 
observations que j'ai pu faire sur 
ia personne du redacteur en 
chel de I'HHHebdo : il ne sup- 
porte pas le blanc dans ses co- 
lonnes... Renseignemenls pris 
aupres de person nalites compe- 
tenles il sagirait la dune phobie 
qui aurait jusqu'a present 
echappe a la nosographie psy- 
chiatnque post-freudienne. C'est 
done bien un scoop I 

Vous me pardon nerez cher lec- 
teur de cominuer a monopoliser 
cette page que je vous aurais 
volontiers cede. J'en profiterais 
pour vous donner la solution de 
notre petit probleme et ferais 
appel a votre honnetete inlellec- 
tuelle en vous demandant de 
bien vouloir retourner votre jour- 
nal de facon a ce que le corrige 
se trouve a I'envers de I'enonce 
du probleme comme c'est le cas 
dans tout manuel edifiant et qui 
se respecte. Merci pour J'impri- 
meur a qui ga facilite bien la 
tache. 

II faut prealablemenl savoir une 
chose c'est que le blanc sur 
I'ecran est en fait un caractere 
espace qui, comme tout carac- 
tere. possede son numero de 
code. On ne pouvait lui en attri- 
buer de plus representattf que le 
"0". on la done fait, Notre pro- 
bleme se resume a identifier les 
caracleres de code et a partir 
de la a court-circuiter le module 
d'inversion video, autrement dit 
a le sauter comme on le fail 
deja pour les caractere s de 
code 118 (fin de Iigne). II suffit 
done d'intercaler entre I instruc- 
tion de chargement de iaccumu- 
lateur LD A.(HL) et avant liden- 
tification des 118 (CP 118) une 
instruction CP suivie dun saul 



conditronnel en L2 (JR Z.L2), 
saut realise si et seulement si la 
comparaison du contenu de lac- 
cumulaleur avec est positive. 
Vous constatez qu'avec seule- 
ment deux instructions supple- 
mental res nous avons dote 
notre programme d'une nouvelte 
et importante fonction. 

Avec les quelques instructions 
que nous maitrisons deja et en 
modifiant legerement la structure 
de notre programme II nous est 
possible de realiser une routine 
d' efface ment d'ecran beau coup 
plus efficace que la commande 
CLS du basic Sinclair. Mais 
d'abord en quoi consiste-t-etle ? 
II s'agit tout simplement de rem- 
placer tous les caracteres du 
F.A. par le caractere de code 
(sauf evidemment les 118 de fin 
de Iigne). Le travail est done 
sensiblement le meme que celui 
exige pour notre inversion video 
globale. II nous faudra balayer le 
F.A., eviter les 118 et placer 
notre valeur dans tous les 
octets du F.A. Ce qui peut se 
traduire par le programme sui- 
vant : 

LISTING ASSEMBLEUR n° 1 



Vous devinez aisement qu'il suf- 
fit de modifier la valeur du regis- 
tre C pour obtenir un ecran a la 
"couleur" de son choix. Pour les 
effets amusants, essayez les ca- 
racleres graphiques codes de 1 
a 10. 

Une derniere variante interes- 
sante consisterait a modifier le 
fond habitue I lement blanc sur le- 
quel s'affiche les messages, 
e'est-a-dire a I'inverse de notre 
video inverse partielle, de ne 
travailler que sur les blancs de 
I'ecran afin de leur substituer le 
caractere de notre choix. Pour 
une utilisation plus souple de ce 
programme la "couleur" du fond 
sera stockee par pokage a 
I'adresse 16507 (inutilisee) ou 
elle sera lue par la routine en 
temps utile. 

LISTING ASSEMBLEUR n° 2 



II ne tient plus qua votre imagi- 
nation de multiplier ces varian- 
tes. Et surtout : conservez vos 
listings car nous verrons bientot 
comment rend re aisement et si- 
multanemenl toutes nos routines 
a partir de n'importe quel pro- 
gramme basic. 

Bernard GUYOT 
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DEMANDEZ LE PROGRAMME soft-parade 



Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 

Nous avons selectionne pour vous les meilleurs logiciels actuellement disponibles en France. Nous ne 
pretentions pas que cette liste est complete et definitive et il est evident que nousyrajouterons regulie- 
rement des programmes. Pourtant, vous chercherez en vain certains programmes quijouissent d'une 
bonne reputation et qui se vendent surtout grace a la publicite et aux conseils des vendeurs quine peu- 
vent pas connaitre tous les logiciels disponibles. 

Les prix sont, nous I'esperons, les meilleurs du marche et les abonnes - anciens ou nouveaux - benefi- 

cient en plus d'une remise de 10 %. Si vous etes nombreux a nous suivre dans cette experience nous 

pourronsrapidementarriveratairebaisserlestarifsdesfournisseurspouratteindrerobjectifquenous 

nous sommes fixe: ramener les prix a une plus juste valeur ! 

Les ctassemcnts sont taits en fonction de Vinteret du programme et ne tiennent pas compte des prix, 

c'est a vous dejuger de I'opportunite de la depense. N'oubliez quand meme pas que si le rapport quali- 

te/prix est mauvais, le logiciel ne peut figurer dans cette page ! 
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Si vous etes A60NNE 
deduisez VOUS-MEMES 
vos 10 %de REMISE 
sur le bon de com ma ride. 
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LA BATAILLE D'O'CHIMINN — "*■» 



Dans la ville d'O'chiminn, profitant de I'abscence de 
LUCKY LUCKE, la bataille entre les O'HARA et les 
OTININS continue. Parviendrez-vous a regler le sort 
de cet eternel combat ? 

Philippe BOICHUT 

Mode d'emploi: 

Les deux joueurs sont separes par une ran gee de 5 cactus el ceci 
sur 4 lignes (A.B.C.D). II faut abatlte ces cactus jusqu'a ce que plus 
aucun ne vous separe de voire adversaire. Pour abattre ces cactus, 
rentrer a la question "voire choix" les coordonnees. 
Exemple:A3: abattra les 3 premiers cactus sur la ligne A. Enfin 
quand plus aucun cactus ne vous separe de votre adversaire. ren- 
trer la letlre correspondant a sa position suivi de F. 
Exemple : 
AF: abattra votre adversaire sur la ligne F. 

10 REM a************** 

13 REil # BOICHUT * 

16 REM * PHILIPPE * 

19 REM *************** 

22 REM * VIC 20 + 3K* 

25 REM *************** 

28 REM * O'CHIMINN.l* 

31 REM *#*****»******* 

34 PRINT":]" :P0KE368?9. 25 

3? P0KE52,28-P0KE56*2a:H»7168:F0RI-HT0fl+51J;POKEI,PEEK(I+256e8>:NEXT 

48 F0Rfl=7448T 07623 ■ RERDB ■ POKER, B : NEXT 

43 DHTA0, 0,0-8. 48, 48-96. 255. 32,31. 3. 3. 4, 1,3,0, 207, 248-248. 248, 200, 16. 160. 64 
46 DRTA0, 0.0-0. 24, 24, 96, 127. 48- 15. 3. 3,2, 4, 2. 1-207. 252, 248, 249-200, 4, 4,8 

49 DRTA0, 0, 0, 0, 0,24, 24, 96, 0,120, 15- 15, 15, 27, 32, 64, 235, 143, 24B, 240, 240, 12,2,1 
53 Dfl FHZ5S, 255, 255, 255,255, 255,253,255 

55 DHTA56,56,2S5,60, 126, 126, 126-60 

58 DRTR60, 126- 126, 126- 126, 126- 126, 127 

61 BRTR126, 126, 126- 126,36,36,36.36 

64 DHTR36-36, 36.36,36, 36, 36,54 

67 CRTR56,56,56, 255,44,68, 68, 68 

70 BATR68, 56, 124, 252,252, 252, 252, 252 

73 DRTR252, 252,252, 252,72, 72, 72,72 

76 DHTA72. 72. 72,72,72, 72, 72,216 

79 DRTR8,0,0, 142,220, 120,8,0 

82 DATR8,0,e,3?, 11, 15.8,8 

85 DRTR0,0, 0,24,0.8, 8,0 

88 DRTR4, 8, 16,0,0.0,0,0 

91 POKE36869,255:P0KE36878,15 

94 PRINT"^«llli)(HBBDe«tBM«DMaWKaiOB, ,,,,,,,"; 

97 PRINT",, 
180 PRINT", 
103 PRINT"! 




,,,,,,,,,,,,., «" -P0KE8183, 44- POKE38905, 5 

LUCKV LUCKE PHRTRIT H EN VRCRNCES ! ! 
106 F0RA-38796T038839 ■ POKER, 8 • NEXT 
109 cl "8098 , 

112 POKEC1,39-POKEC1+1,40:POKEC1-21,41 
115 FORH-1TO400;NEXT 

1 18 P0KEC1 , 32:P0KEC1 + 1 . 32 :P0KEC1-21 , 32 
121 Cl=Cl+2 " 

124 PQKEC1,42:P0KECI+1,43:P0KEC1-21,41 
127 FORO=1TO300'NEXT 

138 P0KECl,32 : P0KECl+l,32:PQKECl-21-32 
133 r.l=Cl+2 

136 IFCl-811BTHENFORT»nO408-NEXT-GOTO142 

139 G0TQU2 

-tiz PRiNT-mv a mmammmMa m mm, j , , , , ,,,,,,..,,...... "; 

145 PRINT" ,-,..,--,,.-,....'■; 

148 PRINT" ,,,,,,, ,-,.,,,,«"■ P0KEB1B3, 44- P0KE38985. 5 

151 PRINT"MWHM TOUT SEMBLRIT CALME H fl 08CHIMINN 

154 FORH-=38752TO38839'POKEFl,0iNEXT 

157 Cl=8855-C3=8074 

160 POKEC1 , 46 : POKECl-22,45 :P0KECl+22, 47^P0KECI*44, 48 

163 P0KEC3,58P0KEC3-22.49:PQKEC3+22,51 :P0KEC3+44, 32 

166 FORT=1TO4000:NEXT 

169 PRINT"MnHM MRIS IL N8EN ETRIT IB RIEN 

172 F0RT=1T0588-NEXT 

175 POKECI+1,53'DB-8057:FB=7877.POKE36877,200-FORT»1TO80.NEXT-POKE36877,0 

1 78 F0RR=DBT0FBSTEP-28 : POKER, 53 : POKER+30728, : FQRT-1T058 ■ NEXTT 

181 POKER, 32-FORT=lT038-NEXTT 

184 NEXTR:P0KEC1+1,32 

18? FORT*1TO500:NEXT 

1 90 P0KEC3-1 , 54 ■ DB-8072 : FB-7856 : P0KE36877, 200 ■ F0RT-1T088 : NEXT ■ P0KE36877, 

! '? ■ FuPR=DBT0FBSTEP-24 POKER, 55 ■ POKEA+38720. s F0RT= 1 TO50 i NEXTT 

196 POKER, 32FQPT=1TG38 NEXTT 

199 NEXTR P0KEC3-1.32 

282 PRINT"iMOOMI LES 08HARH ET LES OBTIMINS C0NTINUR1ENT R SE BRTTRE 
205 FOPT=1TO3000:NEXT 

288 PRINT":!" : POKE 36869, 240 
211 PRINTCHR*(14> 

214 PRINT" 'JO l~N ORGRNISfl DONC UNE SERIE DE DUELS ENTRE LES 2 FRI1ILLES. 

217 PRINT"* LES MEMBRES DE CHRQUECLAN S'RFFRONTERRIENT EN DUEL. 

220 PRINT")HI_E PREMIER DES 2 CLRNS QUI TOTFILISERA 6 VICTQIRES,"; 

223 PRINT"SERfl DECLARE Xt*,/* '~ t- IET Sfl FRMILLE REGNERR SUR V'~ 

•V. 

226 F0RT=1 TO 12008 NEXT 

229 PRINT":KH1 XDUS RUREZ LE LOURD IFRIVILEGE DE DEFENDRE V CES DEUX CLRNS, 1 
232 PRINT"ET *RINSI D'RSSISTER fl UNE MGRRNDE BRTRILLE DE IL'HISTOIRE "J 

235 PRINT"DU -*- 0"»l " 
£-Jfc: FuPT*lTO5008 NEXT 

239 R-7I68'FORI-flTOR+51PP0KEI,PEEK( 1+25688) :NEXT 
241 RW73e4:fl0-7423G0SUB265 
244 flU«RU+64:RQ=R8+128C,0SLIB265 
247 RW-RW+184flQ=HQ+120:GOSUB265 

230 RW=RW-264.RGl=RO-296:OOSUB265 
253 RW-flW-280:flO-RO-200'GOSUB265 

236 HW»AW+20eRD»AQ+208GQSUB265 
259 RW-RW+56-RO=flQ+56 G0SUB265 

262 AW-AW-80 1 AOAQ-68 1 G0SUB265 i G0TO352 
265 FORA-AUT0AQ ■ REflDB ■ POKER, B ■ NEXT : RETURN 
268 DflTR126,255. 193,193,195. 195. 195,255 
271 DRTR255. 195. 195. 195. 195, 195. 195, 195 
274 DRTH254.255, 195, 195, 195, 195. 195,255 
277 DHTR255, 195, 195,195-195,195. 195,254 

200 DHTR127.255. 192.192,192,192.192, 192 

283 DRTH192, 192,192,192,192,192,255,12? 
286 DRTH254,253, 193,193,193,193,193,193 

289 DRTR193, 193, 193, 193,193,193,255,254 
292 DRTH56, 56,255,68, 126, 126, 126,68 
295 DRTR60, 126, 127, 127, 127, 127, 127, 127 
298 DATH126, 126, 126, 126,36,36,36,36 
301 DflTR36,36,36,36,36,54,0,0 

384 DflTR2, 130, 138, 138, 138,76,72,40 

307 DflTR16,16, 16,16,16,16-16, 16 

318 DRTR8,0,0, 142,220, 120,8,0 
313 DflTR56,56, 56, 255, 44, 68,68,68 

316 DRTR6S, 56, 124, 232, 252,252, 252, 252 

319 DRTR232, 252, 72,72, 72,72, 72, 72 
322 DRTH?2,?2,72, 216, 0-0,8,0 

325 DRTH0, 0,0, 57, 11,15.8,0 

328 DRTR0, 8,8,0, 24,8,0, 8 

331 DRTR0, 28, 172, 199-135-199, 69,4 

334 DRTH68, 127,253,255,235,255, 127,63 

33? DHTR0, 64-65- 127, 127-1-0,0 

340 DRTR32-45, 255,235-255, 255,237,32 

343 DRTR252,254,255. 253. 255. 255. 255,252 

346 DRTR0,0, 4,4, 252,252,252,0 



349 DRTR4-8. 16,0, 0,0, 0,0 

352 TZ*-"0'CHIPtINN2":P2*="l" 

355 PZ»VRL<PZ*> 

358 P0KE36869.248 

361 PRlNT"n*EWl"-PRINT"M«L0flD"+CHR*<34)+TZ*+CHRJ'-,3-t^' i ,"^; ■.-: ■' ■■ F ;;.?■) ■ 

364 POKE198,6:P0KE631,19'POKE632, 13 P0KE633, 13P0KE634,82 : PQKE635,213P0KE636, 13 



ID 


FFM 


*************** 


13 


phi 


• 


BOICHUT 




lb 
19 
22 

25 
28 


REM 
REN 

PEn 
REM 


* 


PHILIPPE 


• 


* 


VIC. 20 + 3K 


« 


« 


O'CHIMMIN 


* 



- /T\» ' 



t r,-*m 



■ PGKE198.0 



i***l 



34 P0KE36879.25 

37 PRINTCHR*C14):PRINT"^D0BO 

48 INPUT" X3UEUR.ll"iN3» 
43 INPUT ,, W«n'OUEUR.2l"iN4* 
46 0J-INTCRND<1)*2)+1 

49 PPINT"3mWfl",N3*:PRlNT"l7i'0US 5EREZ DESOPHAIS *1 UN V Itutt I 
52 PRINT"1MMIIET "N4J-PRINT" S UN riA>/»!! 
55 N1*»LEFT*CN3*,4) 
58 N2*=LEFT*(N4*,4) 

61 PRINT"»m«l BB*T* t/~ \F /- \~W -POKE198,0 
64 GGSUB408■PRINT ,, T , PPINTCHR*(342) 

6? Hl=36869 H4=Hl+7 H5=Hl+8 H6"Hl+9 H7=H1 + KJ:P0KEH6,15 
70 PRIKT'TT-POKEHl^SS 
73 PRINT"«ar*[ IK * * * * 

76 PRINT"* li+ + '+ + + 

79 PPlMT"^Hfi«l) IH * * * * 

82 PRINT"!»T Hf + * + + 

85 PRINT'TamW*- 
88 PRINT"!* 
91 PRINT":ra»B 
94 PRINT "W/i 
97 PPINTSPC<1>N1*,SPC<3'N2J 

100 PPINT"OMHflPFl"Hfl:SPr:.2)"0NTlMINS"PT"«" 

103 UUSUB382 

106 PRINT'-fl"; POKE198.0 

109 IF0J=1THENPR1NTN1* , ' "i 

112 IF0J-2THENPRINTN2*" "; 

115 INPUT'-f^OTRE CHOlXl" ; R* :L=LEN<flf ) 

118 IFL>=3THENPRINT"T n"-GOT0186 

121 CM =RSC'. LEFTS <R», 1 ) >-64 : 02-VRL(RI0HT*<fl*, 1 > ) 

124 ai=RBS<01) 

127 IFO1=0ORQ1>=5THENL=5.GOTO118 

130 IFQ2>=6THENL=5-G0T0118 

133 PRINT'Tl T 

136 Q3«RSCCRIGKT»<fl*,l))-64 

139 0N0JGOT0142, 163 ' 

142 C9=C1 

145 0N01G0T0148,151,154,157 

148 C 1=7726 'G0SUB184:GQT0168 

151 C1=7836:GOSUB184:GOT0168 

154 C1=?946-G0SUB184:G0T0168 

:':'"" '-" ■^■■■j'Vi- OatUEl J4 

160 FB=BB-m-<Q2*2)-GOSUB235GOSUB214-OJ=2-GOTO106 

163 C8=C3 . 

166 0NQ1G0T0169.172.175, 178 

169 C3=?743 G0SIJB199-G0TO181 

172 C3=7353 00SUB199 G0T018I 

175 C3=7963G0SUB199 : G0T0181 

178 C3=8873-G0SUB193 

181 FB=DB-l-(Q2*2)-GOSUB247:G0SUB223 0J=lG0TO186 

184 P0KEC9-22 , 32 POKEC9 ■ 32 POKEC9+22 , 32 ■ P0KEC9+44 , 32 

18? POKECl-22,38-POKEC1.39:POKECl-i-22,40POKECl+44,41 00SUB313-P0KEC1*1,44 

199 POKEC 1 +3072 1 . 8 DB=C 1+2 

193 IFQ3=6THEN259 

196 RETURN 

199 P0KEC8-22.32 POKEC8,32 1 POKEC8+22, 32 ■ P0KEC8+44, 32 

202 P0KEC3-22.45 :prjKEC3,4fc P0KEC3+22,47 POKEC 3+44, 56 GrjSUB313-P0KEC3-l , 59 

285 POKEC3+30719,8-DB=C3-2 
208 IFG3=6THEN268 

211 RETURN 

214 FORX=DBTOFB ^POKEX, 68 -POKEX+ 30723, TT=?0 OOSUB406 .POKEX, 32 : NEXTX 

217 IFflZ-lTHENFIZ=0-RETURN 

.?J0 POKEC 1 + 1, 32: RETURN 

223 FORX=DBTO(FB+15STEP-l:POKEX,60:POKEX+30728,0:TT=100:GOSUB406:POKEX. 32 NEXTX 

226 IFWW=1THENRETURN 

229 IFflZ=lTHENflZ=0:RETURN 

232 POKEC3- 1.32 RETURN 

235 IFPEEK<FB>*32THEN241 

238 RETURN 

241 PRINT"WI INJDURBLEiT'-G0T0244 

244 POKEC1+1 , 32 ■ TT=1509 i GOSUB406 : G0T0186 

24? IFPEEK>:FB+1^32THEN253 

250 RETURN 

253 PRINT"* INJOURBLEBT 1 ;GOT0256 

256 POKEC3~1,32:TT=1508 GOSUB406 : GOTO106 

259 Fl=PEEKCDB+3>F2=PEEK(DB*5) : F3=PEEK<:DB+7)-F4=PEEK<DB+9:' F5=PEEK(DB+1 1) 

262 IFFK>?20P^> ■:: ;:20=-F3O320PF4O320RF5O32THEN241 

265 FB=DB+13 RZ=i:G0SUB214 GCSUB316:G0T0277 

268 Fl=PEEK(DE-2)F2-PEEKCDB-4rF3=PEEK(DB-6)F4=PEEK':DE-8):F5=PEEK<DB-10.' 

271 IFF1O320RF2O320RF3O320RF4O320RF5O32THEN2S3 

274 FB=DB-14-FlZ=l:O0SUB223:G0SUB316-G0T0293 

277 HR=HR+i:D3=C3+43-D4=D3+38720 

2*c : . yn\:fS.-<~2Z ■■--■ prii-.i-i.-.:-.: J2:PClKEC3+22,32:P0KEC3+44,32 

283 P0KED3.25 POKED3+l,62:p0KED3+2,61P0KED4,8 POKED4+1,0 POKED4+2,0 

286 TT=1000GOSUB406 

289 IFHfi=6THENG*="0WHRRA" ■ G1S-N3I GOT0319 

292 GOTO70 

295 PT=PT+lD5=Cl+43:D6=D5+30720 

298 P0KECl-2ii2 POI EC! ■ 32 ! P0KEC1+22, 32 : P0KEC1+44, 32 

30] P0KED5, 0POKED5+1, 26 POKED5+2,33 P'> Efi<£. . r. p-.i.-i ETJ6+1 ■ 9 POKED6+2-0 

304 TT=100B:GOSUB406 

387 IFPT=6THENG$="0HTIMINS" : GH=N4* G0T0319 

310 GOTO70 

313 pril-EH":. ■ 330 TT = H« r-riSUB4i.j6 ' pncEH?. ■ RETURN 

316 Ptih.EH4,228 F0Pri= ITCH 00 HEMT F0KEH4.0 RETURN 

319 TT=1000-GGSUB406 

322 P0KE36969-2S5 

325 PPIMT":HSH«CI«1II)W1 EPRVi'iO "A" PPIIITGlt" "DS 

323 PPINT".»Mi MHIS CE WEST PRS DE CHANCE VOUS NBTES PRS LE CHEF ffOWCHIMMIN ", * 



TOM ET CHERIE 




COMBAT NAVAL 



Plus besoin cie chercher un partenaire pour jouer a la 
bataille navale.Ce programme fera de votre ORIC un 
adversaire tout a fait honorable. 

Christophe LANURE 

16 REM**m****m******** .143.2.136.209.249,163,8,24 9ELSEX-X+1 >GOTO460 

!-- PEMi-f*»c atM T NAVAL**** .105.40.133:8.144,2 485 IFU-138THEN490ELSE493 

2« RFrit ******************* 258 DATA230- 1,163.2.24. 103. 490 A2-H2+1 ■ IFA2M9THENA2-1 

23 REM***ParJ C LAMURE*** 40,133.2.144,2.238.3.202.20 9EL-SEX"X+48'GQTO460 

30 REM******************** B. 222. 96 493 IFU-139THEN590ELSE505 

35 REn****ORICl'flTrlOS***** 253 REM 509 R2-H2-1 i IFA2<0THENA2-0E 

48 REM******************** 268 REM**INITIALISATION*« L8EX-X-40 • G0T046S 

45 REM****£XPLICATIOWS**** 265 REM 303 IFU-136THEN51BELSE515 

58 REM 270 DIMZ<19,19> 318 AI-R1-1 : IFWKBTHENA1-0E 

55 PFWER0 IWK3 CLS PRINT 275 FE3RG-46888+33*BT 046888+ LSEX-X-1 GOT04J8 

69. PPIIITCMR*' 4 ItCHRIi 27 >; "J 33*8*15 313 IFOI93THENPOKEX-276B. 1 

COMBAT NFHVflL" 289 PEAWI ■ POKEG- M NEXTG 61-G0T0469 

65 PRIHTCHP*(4>'PDKE619,2 295 PRTA25.37.4, 1 ,25.37,4. I 320 IF(J-160THENPIMG'POKEX.3 

70 PRINT'PRINT " REGLE .63.1,29.63,29.9.63.63 4'POKEX-2768.34'GOT0468 

299 FOR0-44460TO44460* 19*40 523 IFU-141THEN533 

75 PRINT:PRINT"Le but *) it STEP40 : FORP-BT019P0KEO*P, 1 338 G0T0468 

.) est d» cooler le" 61 NEXTP' HEXTQ 535 GOSUB 1 5 1 ' PLOT 1 ,21, "ORI 

09 PRINT" Premitr U flotte 295 F0RO-47146T047 146* 19*48 C PLACE SES BATEAUX" 

adverse" STEP4B FDRP-0TO19:POKEQ+P, 1 340 REM 

85 PRINT "Pour ceta I? J 62 MEXTP'NEXTQ 343 REM******MISE EN PLACE 

Oiwur tt one tire" 390 V2-48' V3-48' V4-49 ■ V3-48 OE VBISSAUX DE L'ORIC****** 

90 PRINT"? tour <i° rile un 395 ys-49,v7«49'V9=48' V9«4B 358 REM 

obus" 319 POKE0.44459>POKE2,43279 553 PL0T1 .23, "PBTIENTEZ UN 

95 PRINT .PRINT"Les instruct •CALL1024'DOKE8.44439'DOKE2 INSTANT" 

ions sont donneea »u" .45299:CALL1024 368 B«L.JM S"B+1 

100 PRINT *GOUr» du J* 313 PRINT'PRINT"T«PEZ UNE T 565 R-R-l ■ IFR >0THEN380 

u" OMCHE"'G£TDi:ZflP:CLS 370 M*1>VM THEN7B0 

105 PRINT'PfilHT "Oric rap 32B CLS 373 B-B+2'R-B 

Pelle fJe" 323 REM 380 T-A 

110 PRINT"2 mvires ne doiv 330 REf1**PRESENTATI0M(* 395 K-INT<RND< 1 )*2>'E-INT(R 

erst Pas se toucher " 335 Red NDC 1 )*28^F-INT<RHtX 1 )*20> 

115 PRINT"fteme Par un coin" 34g PLOTB, 1 , "NAVIRES COULES 390 I FK" 1 THEN603 

126 PRINT 'PRINT"Oric »ous f • 395 IFF+AM9THEN583 

era rejouer si vous aver 343 PL0T1,3," VOTRE FLOTTE" 600 GDTO610 

125 PRINT"deJa roue uit» CM .pLOTl ,9. "FLOTTE EMMEM 683 IFE+BM9THEN585 

e" IE:" 61B X"47H6+F+E*40 

138 PRINT'PRINT" ATTENTION 358 PLOT0.4, "PORTE AVION'": 615 IFK-8THEN700 

>Ht flite* Pas d'erreurs " PLOT0, 18, "PORTE RVIOtffi." 628 IFP££K< X ?-340RPEEK< X+40 

135 PRlHT"lorsq...e vo" • entr 335 PL0T8,3, "DESTROYER ■ " 'PL )-340RPEEK( X-40 »34THEN625E 

pi les coordonneea" 0T8, II, "DESTROYER" L8E638 

148 PRINT" Vous ne Pourrei P 359 PLOT0.S, "CROISEUR' " 'PLO 623 F-F+2> IFFM9THEN393ELSE 

as le» modifier" T8, 12. "CRDI8EUR' " 61B 

145 PRINT 363 PL0T8,7, "SOUS-HRRIN' "■ 630 IFPEEK< X+l D-340RPEEKC X- 

150 PRINT"T»Per Une kouerie PLOTS, 13, "SOUS-MfiRIN: " 39 )-340RPEEK< X+4 1 >-34TH£N63 

Pour la siUte"'GETQ» 370 PLOT0.S. "CORVETTE '" 'PLO 3ELSE640 

155 ZAP'CLS TA, 14, "CORVETTE" 633 F«F+3 1 IFFM9THEN585ELSE 

160 PRINT 'PRINT"Vous devei 375 P0KE48888. 1 ■P0KE48161.6 618 

Placen" 339 poke48481,6 648 IFPEEK( X-41 )-340RPEEK<X 

165 PRINT'PRINT "1 Port«-av 395 PL0T2, 16, "VAINQUEUR' " -1 )-340RPEEK( X+39 >=34THEN64 

Ion de 3 cases" 398 POKE48722 . 12P0KE48721 3ELSE658. 

179 PRINT "3 dtst ,5'P0KE49738.8 645 F-F+l ' IFFM9THEN5B5ELSE 
rovers de 4 cases" 395 D0KEe.43279:D0KE2,488S9 610 

175 PRINT "5 crois CHLL1B24 650 T-A-l 1 IFT-0THEN6 

eurs d« 3 cas&s" 400 A*65 90 

180 PRINT 
mariiis de 2 rase 
185 PRINT 
tt» de 1 case" 
190 PRINT'PRINT" 



ORIC/1AMOS 





753 i 
35 



■ in 



760 FOPN-0TOA-1 P0KEX-N.34: 

NEXTN 

765 GOT0565 

770 POKEX.34:G0TO565 

775 REPEAT'P-P-H'PRINT'UNTI 

LP-30 

790 D0KE9. 48059 >D0KE2> 45299 

CALL 1024 
785 D0KE9.45279:DCKE2. 48839 

CALL 1024 
790 REM 

795. REMW*ENTREP PES DONNEE 
S DU JOUEUR*** 
—3 REM 



1000 02-02+lP0KEX-2798,34 

:P0KEX,34 

1005 GOTO 1030 

1010 PL0T1.21."V0US AVEZ TO 

UCHE" 

1015 POKEX,34:SHO0T 

1020 P-8P0KEX-2788.34 

1023 02-02+1 

1030 PL0T1, 24, "TAPER UNE TO 

UCHE *iGETO*< ZAP 

1035 D0KE9.45299D0KE2,4B85 

9 CALL 1024 

1940 IFK«-"C"ORS-9THENIBS0E 

LSE1065 

1045 REM 

1050 REM****JEU DE L'ORIC** 

m 



.J 060 P 



■0'S"0'U"INT< 
RND'1>*2*1 >'IFU-2THENU"3 
1863 GOSUB1S10 
1878 PL0T1,21,"0RIC JOUE" 
1873 IFT-1THEN1113 
1080 E-INT(RNDa>*201'F-INT 
( RNDt 1 )*28 > 
1085 X-49960*F+4B*E ■ 
1090 IFPEEK(X-3609K>162THE 



893 G0SUB1319 

810 PL0T1,21."ENTRER LA COO 

PDONNEE HORIZ0NTALE'":GETF« 

■ F-ASCC F« )-6S 

815 IFF>19ORF<0THEN810 

820.PLOT1,23-"ENTPER LA COO 

PDONNEE VEPTICALE"'F;etE«:E" 

HSCC ES >-65 

825 IFE>19ORE<0THEN828 

830 IFZ(F,E)-1THEN895 wo 

835 2<F,E)=1 7^119 F»8:E-8:G0T01883 

848 G0SUB1519 J 1 1 1 T X-DEEK( 1 ) ■ F"PEEK( 08 

843 X=48060+ F+E*40 *C E"PEEK<09) 

850 IFPEEKCX-914 >34THENB7 UZ8 F-PEEK<88> 



193 F-FM.IFFM9THEmt03' 

88 G0T01883 

93 F«8'E-E+1:IFE<2BTHEN18 




229 PPINT'PRINT'PRINT" PATI 
EHTE2 UN INSTANT" 
225 FORP=1824TO1069 = REA 
DM POKEP.M'NEXTP 

239 REM 

235 REMtf?ROUTINE HSSEHBLEU 
R D'AFFICHAGE*** 

240 REM 
245 (.'ATAI62-20- 160-20, 177.0 



485 FOPQ*48839TO48059+19*49 

STEP40POKEO.17POKEQ-1,A:P 

nKE0-2.3'A=fl+l:NEXT0 

419 A=65 

415 F0RO-49828T 049039 ■ POKEP 

,A A=A*l:NEXTQ 

429 POKE49008.3 
423 REM 

430 REN****MISE EN PLACE TE 
-- '-'A I = ■5EFH.1X '■" JOUEtJP#*t 
435 REM 

440 PL0T1. 21 -"PLACER VOS VA 

ISSAUX " PL0T2.22,"P0UR VAL 

1DER TAPER <ES*>" 

445 PL0T2,23,"P0UR ANULER T 

RPEP <A>"PL0T2 J 24,"P0IJR VO 

US DEPLACER'LES FLECHE8" 

458 PL0T2-25,"5I VOUS AVEZ 

FINI '<RETURN>" 

433 X=48470R2=19:A1"10 

469 PEPEflTPOKEX,42:UAIT05' 

POKEX , PEEK< X -2760)'WAIT03 

_ ~ 1 IpESEXllBflE 1 




655 X-X*40 

660 IFPEEK(X+39)»34THEN635 

665 IFPEEK<X*40)"34THEN625 

670 IFPEEKCX*41)«34THENfc45 

675 T»T-1'IFT-8THEM690ELSE6 

55 

680 F0RN-9T0fl-lP0KEX-N*' f 9. 

34: NEXTN 

683 1 i3Tr.,565 

690 P0KEX.34 

693 G0T0363 

700 IFPEEK(X>«340RPEEK'.X+U 

■340PPEEKC X-l >-34THEN795ELS 

E710 

785 E-E+2'IFE>19THEN585ELSE 

610 

710 IFPEEK(X-39>"340flPEEKrX 

-49)»340RPEEh;'/.-ai ■=34THEH;- 

15ELSE729 

715 E=E*1 : 1FE ^ISTHEN'-.vSEL'r.h 

618 

720 IFPEEK<X-*i9»340RPEEK'K 

+40)=34ORPEEKCX+41 )=34THEN7 

23ELSE730 

725 E=E+3'IFE.19THEH-^-;F!.-.F 







1123 


E-PEEKC 89 




855 


PL0T1,Z1,"T1R A L'EAU"' 




IFN-2THEN1173 


POKE X.PEEK<X-914) 
















GOTO 1030 


1143 


U"ItF"F+H 


IFF>19THEN11 




Q=1:I>1 














































1163 


F-F-M'M-1 


IFPEEK(X-360 




















1175 


F-F-M:N-2 


IFF<9THEN1 


























IFPEE«X-3600X>I6ZTHE 
















GOTO 1200 
















9>=161THEN1143 




930 


O-r)*l'U»U-HGOTO920 


1200 


E=E+M • U=3 


IFE>19THEN12 



933 Q=l 

940 IFPEFK-X*Q*49-914 X >34 

THEN953 . 

?43 !FPF... ■■ y+ntdf - •--1THEH5 



lMJ+1 GOTO940 
" "},975.S 



.965 

960 GOT0998 

963 U«-"IJN POPTE AVION" Vl = 

4? P0KE48455, VI 'RETURN 

970 UM"UN DESTROYEUP" :V2- 

V2+1 :P0KE46494,V2:RETUPN 

973 U»="UN CROISEUR" ■ V3=V3 

+ 1 PnKE49534.V3:RET'JPN 

flHO i.U = "ijh SOUS-MAR I N-" V4=V 

4+ 1 ■ P0KE48574. V4 ' RETURN 

985 U»""UNE CORVETTE" 'V5=V 

5+1 P0KE48614.V5' RETURN 

998 A*= "BRRVO VOUS AVEZ 

COULE "+U» 

995 EXPL0DEPL0T1.21.B8 



20 

1285 G0SUB1455 

1218 IFPEEK<X-360BK>162THE 

NI269 

1215 E-E-M M-l G0T01238 

1228 E-E-MM-1 ' IFPEFC ■" ^- ?6i 

9>=161THEN1238 

1225 G0T01143 

1239 :E«E-H'U"4IFE<0THEN12 
58 

1235 G0SUB1455: 

1240 IFPEEK<-X-3i?.00XMe2THE 
N1260 

1245 E"E+M:M=l:G0T01145 
1259 E"E+M'M-1 IFPEEK(X-336 
0)=161THEN1280 
1233 G0T01145 
pL1268 POKES . PEEK( X-276B > 

1265 'POKEX.42'UAIT20:POKEX 

-PEEK'5VWAIT20 

1270 K«-KEY»>IFKi-"T"ORK»-" 



03 

1288 PRINTX 

1283 T-1.P0KEX-36B8.162PC 

EX,42'P0KEX-276B.42 

1298 L-L*1:IFL>1THEN1380 

1295 DOKE10,X'POKE00.F.POKE 

09.ES"I'GOTOI413 

1300 M-M+l> 8*8+1 iOBTDM 

1305 IFK»-"E"THEN1319ELSE13 
25 

1310 POKEX.162'POKEX-3680, 1 
62'POKEX-2768,162 
1315 H-l :U-U+1IFW>4THENW-1 
1320 GOTO I 420 

1325 IFK«- "C"THEN1330ELSE1 
263 

1338 S"S+l'T-e<P0KEX,42 
1333 P0KEX-Z76B. 42 
1340 0NHGOSUB134S. 1330, 1333 
, 1368 'G0TO1 363 
1343 C"- I 'RETURN 
1330 C- I 'RETURN 
1335 C— 48'RETURN 
1360 C- 40 'RETURN 
1365 FORQ-lTOSPDKEX-3681,1 
62 ■ POKEX-3600 ,162: POKEX-339 
9,162 

1370 POKEX-3360.162'POKEX-3 
561 , 162 1 POKEX-3339, 162 
1373 P0KEX-3648-162'P0KEX-3 
64I,162>P0KEX-3639,162 
1380 X-X+C'NEXTQ 
1383 ONSGOSUB 1398, 1395, 1400 
,1403,1410 'GOT014I3 
k 1398 V6"V6+1'P0KE48374,V6'S 
ETDRN 

1393 V7"V7+1:P0KE48334.V7'R 
ETURN 

1400 V8"V8+1'P0KE48294,V8'R 
ETURN 

1403 V9"V9+1'P0KE4B254,V9:R 
ETURN 

1410 P0KE49214,49:RETURN 
1413 01-01+1 
1420 IF01-33THEN14B5 
1423 IF02-33THEN1488 
1430 IF01>02THENPLOT4,17," 
RIC" 
1433 1F0K02THENPL0T4,!7," 

OUS" 

1449 PL0TI.24,"TAPEZ UNE TO 

rjCME"GETO«:ZAP 

1445 DDKE0,43279'DOKE2.4983 

9 'CALL 1024 

1430 G0T0795 

1455 X-48060+F+4B*E 

1469 RETURN 
1465 REM 

1470 REM****TEST DE FIN**** 
1475 REM 
1490 GOSU81310'PLOT1,21,"BR 
PVO.VOUS AVEZ GAGNE" :G0T01 
505 

137:s i;n?.MB15!e PLOT 
IT P CBGNE" 
1498 PL0TI,23."V0ULEZ VOUS 
VOIR FJU ETAIENT LES" 

1495 PL0T1.24,"VRISSEA(JX Dt' 
ORIC 0''N'':GETn»'IFO»-"0"TH 
EN1599ELSE1583 
1599 DOfE0-47145DOKE2,4803 
9: CALL 1024 

1505 PL0J1,25."V0ULEZ \ 
RECOMMENCER O'N" GETO*'IFn» 
= "0"THENJBELSEEND 
1510 F0R0=21TO25:PLOT9,Q," 
"'NEXTO j , 
1515 RETURN » 



OR 



X-4VLO 



^ Mr, 



ETIQUETTES 



FX 702P 



Ce programme astucieux vous permettra de creer d'ori 
ginales et somplueuse etiquettes. 



y compris ceux qui ne peuvent 



Mode d'emploi 

Ce programme utilitaite permet d'imprimer sor la largeur du papier 

des caracteres alphanumeriques ei quelques signes. sort : 

1 - les lettres de A a Z 

2 - les chiflres de 1 a 9 (0= O) 

3 - les signes ( : - et) 
L epaisseur des traits est constrlue par: 

1 : un pave noir 

2 : le caractere agrandi 



3 : par n'impdrte quel a 
pas etre agrandis (+ .-...:. ft . etc...) 

Tout d'abord. il vous faudra stocker les caracteres non accessibles 
n i, i n.DncuMc au clavier de la (aeon sutvante : charger le programme 1 VAC : 
tjaDnei UAHUtNNt FO r I = T0199 : A (I) - RAN # : NEXT I el le lancer apres avoir 
tait DEFM 20. Eteindre la calculalnce et relirer les piles puis les 
remettre 1 minute 2 secondes plus lard Allumer la bete et raccorder 
I'imprimanle. Faire MODE 7 et LIST V Vous verrez apparaitre 
dans les variables A a T9. des signes divers qu'il vous sultira d iso- 
ler par simple translert de variable 

Exemple : Si R$ = : :::::1:u " . (aire S R$ et AOS MID 18 1 1 et 
le caracteres u sera slocke en AOS 

Sauvez sur cassette les memoires a conserver taire VAC. CLEAR 
ALL et recommencez plusieurs tois Apres avoir une derniere tois 
"vide" la machine charqez proqrammes et variables AOS a D9 el 



U caractere le type de 



-- signifie que les traits seront constilues par te meme caractere que 
celui qui est agrandi. 
* les lettres seront dessinees a t'aide de paves noirslouadefaut S ). 
stockes en AOS 

Caractere indique due I'dn peut entrer n'importe quel caractere au 
clavier saul = et | . 

Apres ce choix, lecran indique : "A-z 1-9 (:-)", soil, I'ensemble d 
caracteres reproductibles. II sulfit d'appuyer sur le caractere choisi 
et d'attendre rimpression. L'espacement est automatique. masis un 
intervalle supplementaire peut etre crde par la louche SPC. 
Apres rimpression dun caractere. le retour au menu permetlanl le 
choix du Iracd, peut-etre eftectue en appuyant sur \ . 



It GOTO 2! 
il tiETIKITES" 
12 E.DKDEME 
M HEBDOGICIEL 

29 MIT 8:P«T "=, 
I OH CnBfltTEBE" 
:Z=2S8 

:e^4ti:IFR!=*" 
THEN 3» 



4(PET :IFKEt<"" 

THEH 4« 
51 MtE 8:K*»I1 
6:PRT " 1-Z 1- 
DC.-)" 
MCMK:1FC»=" 

THEH SB 
65P8T :IFCl='t" 
THEH 21 



6S If Cl=' "ilfOOE 
?:P8T :PRT :FST 
rSOTO 58 

71 IF Xi='=";»!=a 

llfJTO ?8 
88 M=K»: IF XS="f" 

ii st=St»Pt:(='SE: 



IKYI23«s73«' 

111 FO! 1=1 Tl 38:1 
FCt=H!Bii,I)iD 
=8(1) 

128 KE8T I:t=T(JKZ 
:-()":FMi !=1 T 
OJtlFCWIIDd 
,DiM(l*») 

IU HEX! [:«=" 

S5E Mffl»: IF LEHO 
K21 THEH 158 

161 B=M»MS1 ( 
i86«FP5: 5':itOI 
E7iE;i :>St-:: 
F K=l THEH 58 

178 60T3 It8 

as PFT ""i«=::EET 



281 PPT K»(t,18>!« 

PT 

292 RTESR5;flt|tE 

6T0 2 
283 P'kT SiPET 
::■' «.T !:! 2IS18C. 

,7)tCSP lltKIDt 

l,7j:RET 
285 FtT M'Bi 9;9! 

! 1.6110 2 
1U PPT m 2 : M ID < 1 

.mm 

287PETSi;:68TaZ 
28; ?ST ESP 2;at;H! 

;CSF. l«atMMI 

ET 
28? SOTO 2 



211 PIT CS!2IHID(I 

rzJitSI HS«»i< 

ItPET 

211 PET m SlflttRE 
T 

212 PET CSP KM! RE 
T 

213 pst mm 

2:4 PPT r:p 2i«ID(l 

,mm 

215 PET CSS !4:Bt!9 
t!PET 

216 PRT CSP ll:«t;B 
t:(:ET 

217 PET CSP 12;Bi:fi 
ttRET 

218 PRT CSS HUM 



:RET 
! PRT CSS 4! Mint 

:JET 
8 PET CSR 12;«ID( 

I,6):RET 

1 PRT CSR 7!M!M 
!!B0TO 2 

2 PRT CSR 5!fltlCS 
R 9!«t::S0T0 Z 

! PRT CSR 3!fli!CS 

r r.mmn z 

4 PET BKliiUO 
R 11!«»(1.7)!R 

ET 

5 PRT CSR 2!tHlCS 
R 11!HI8(1,7)!R 
ET 



226 PRT CSR 2!«»(1 
,7)!CSS 16!«t:8 
ET 

227 PRT CSR 6;«!D(1 
.!4):RE1 

228 PST CSR 2! MIB! 
!RET 

228 PST CSS lSlMin 

CRET 
238 PRT CSS 11!«ID( 

l,5!iRET 

231 PRT H»!1,11)!R 
ET 

232 PST CSR I6!«f:8 

n 

231 PST m«(l,7)iCS 
R 16;flf:RET 



234 PRT BliCSR 7!R1 
H80TOZ 

235 PRT HdCSR llifl 
(iiSOTSZ 

231 PRT SttCSR 13!« 

»<1,5»«ET 
237 PST CSS 2;B!!CS 

R lblflCSET 
23! PPT CSR 8IHIK1 

,U):IET 
239 PST CSS 2!Bi!CS 

S9!»I[!I,ili!R 

ET 
241 PET CSR 2!»I0(I 

.7);:80TCZ 



USS QUAL2 



Rappellez-vous du USS QUAL1 publie dans le numero 
55. Son auteur nous envoie la suite qu'il a appelle USS 
QUAL2. Ces qualites graphiques et sonores sont meil- 
leures que celles du QUAL1. 

E.FRENKIEL 



I PAR ERIC FREW I EL » 



I 1« 



GOTO J 



220 CALL CLEAR 

230 CALL MASNIFYC2):: CALL SCREENI3) 

140 CALL CHAR[33."O909O9O912E4ABF04".34. 

"07oaio207FE2A4E8" ) 

250 CALL CHARC35."1422222217E1AIE1".36." 
0305091 11FE191E1") 

240 CALL CHARC37."0]02040B10EOAOFF".3B." 
3F0404 1 4 1 42B2SFC " ) 

270 CALL SPRITE(#1.33.7.60.100.#2.34.7.6 
O. 1ZO. #3. 34.7.60. 140) 

2B0 CALL SPRITE(«4,35,7. 100. 90. #5. 33. 7. 1 
00. 110,116,36.7. IO0. 130, #7, 37,7,100,1501 
CALL SPRITE08.3S, 7. 140. 110, #9,38,7. 

"USS QUAL II missio 
n iu bout" 
310 DISPLAY ATC52.10):" de 

L'ENFER" 
320 FOR DELAI-1 TO 300 it NEXT DELAI 
330 CALL CLEAR ;: CALL SCREENIlllIl R«-" 

340 CALL C0L0R(#1,12,82.12,#3.12,#4,12,» 
5, 12.86, 12,«7 F 12,#B. 12. #9. 12) 

350 DISPLAY ATC12, 

360 ACCEPT ATC14.1 

EN 370 ELSE 1870 : 

370 CALL SOUND (50. 1 

:: CALL C0LDRC81,3,#2,16.«3,3.»4,16.«.S 

.#6. 16, #7. 3, #8,16, #9, 3> 

380 CALL M0TI0N(#l,-3<Y,-13,82,-30,0,#3,- 

30.15.»4,0,-3q,»3, 0,-13,#6.O, 13, #7,0,30, 

•8, 30. -15, #9, 30, 15) 

390 NEXT G :: CALL DEL5PRITE 1#1.#2,#3.#4 

,#3.#6 p #7,#8.t9) 

400 CALL MABNIFY(l) 

410 CALL CLEAR :: CALL CHARSET :: CALL S 

CREENC2):: Cl-3 

420 CALL CHARC33-"B080^0B0B0BO80B0 ,, .44. , ' 

0102040810204080") 

430 CALL CHAR<33. "8040201008040201". 36." 

E0FB7C7F3F3FIE1E") 

440 CALL CHAR(37.-30B0DBE44639OFO3".3B," 

0C3329DFC8D492F9 " > 

450 CALL CHAR(39."080C050F9BE452F1".40," 

463F436EAC88B4E3 " ) 

460 CALL CHAR(41."0B1C2A6F91£AA4FB".42," 

AB54AA55AA53231A" ) 

470 CALL CHARI44."40FC747CAC7£0703",72, " 

0B1C1C3E3F7F7FFF") 

480 CALL CHARI73.": 

242ABEB7DFF6DEFF" ) 

490 CALL CHARI75.": 

207159356E74FEFF" ) 

500 CALL CHARC77. "84869292A7FBFAFB" . 78. " 

1 A 9 A9C 99 99BDE7 C3 " ) 

510 CALL CHARC79. "FF5F171202000000".BO. " 

FF7F755141400O0O-) 

520 CALL CHARCBl. "FF7F3D390!000000".B2. " 

00001 O 1 21 ABEBFFF " I 

530 CALL CHARIB3. "000000081 9BBFFFF" . B4. " 

000070 I 01 B3C7EFF " ) 

540 CALL CHAR(a5."FF702B292A22222O , '.B6.' , 

FFBDEAAAAAA22220") 

530 CALL CHAR (37. ■ 

020AOAOA4E9E7FFF") 

560 CALL CHARI89. "0242424A4E5E7EFF". 90. " 

1 21 2A2A2A2757EFF " ) 

570 CALL CHAR(46."0101010101010101",47, , ' 

BO 4 020 1 0OB0402FF - ) 

3B0 CALL CHAR143. "O0O0O0O00O0O0OFF".97. " 

00O204081 02040BO" > 

S90 CALL CHAR(64."FFFFFF00FFFFFFFF",98, " 

814121 11090501FF") 

600 CALL CHARC99,"01O105091l2141BI".10O. 

"FFOOOOOOOOOOOOFF" J 

610 CALL CHARI101. "FF010509112141B1",91. 

"1B34722977FE7C10") 

620 CALL CHARC112.-FFFFFFFFFFFFFFFF-.104 

. "FFOOOOOOOOOOOOOO" ) 

630 CALL CHARC105. "OOOOOOOOOOOOOOFF" . 106 

JlO10101010101".9t. 



640 CALL CHARE) 




■ ' 245 32 DB 4 6 A966509 ' 

650 CALL CHARE71.' 

1010101010101010") 

660 CALL CHAR<69. "1B3C7E1B1B1B1B1B" ) 

670 CALL CQL0R(2,5.2>:i CALL COLOR CI, 5. 1 

) = i CALL C0L0RC5.lt. 13):: CALL COL0RI6.7 

,2)11 CALL C0L0R17,7,2) 

6B0 CALL C0LCRI6.7,2)i: CALL C0L0RI7.7.2 

):: CALL COLORCB.7.2) : : CALL C0L0R19,3.2 

>=-- CALL COLOR! 12. 11. 11) 

690 CALL C0L0R<10,5.11J:: CALL C0L0RC3.1 

3.2):: CALL C0L0RC4. 15. 2) 

700 DISPLAY AT{l.l)l"KXXKXKKKKKMKKM>I>IK>li 



720 DISPLAY t 



_ CQL0RC12.15.15):: 
.15):: CALL COL0R15.5.1 
) CALL DELSPRITEC»1.#25; 



: CALL COINC 



mhhhhhdhhnhhhhhMk 



il30 CALL SPRITEC83.4 



CALL COLOR (1 



rE<#B.3S. 
1090 ELS 



1550 CALL L0CATE(«5.) 

(#6, 103, 15. XI. 23.0. It 

1560 CALL DELSPRITEU 

11.67.13.121,170.60.* 

.-6O.60) 

1570 CALL POSIT 



1100 CALL DELSPRITECALL):: FOR DELAl = i 
i CALL CDLDR(12.6. 
):: CALL CDLQRUO.5.6): : CALL COLOR <5,1 

1110 Pl=5 ■■ C2-2 :: Ml*7 ■ ; DISPLAY Al 
4.251SIZEU 

J CALL SPRITECI 



!(#25.£ 



1.60, 



=5):: CALL SPRITE 

: GOTO 1400 

': = CALL SPRIT 



i CALL £ 



oooooooboooooooo" ) 

ITE(#2,»3.#4.#5.«10.M! 
P2<0 THEN P2W3 j : 



.36,15.150.130) 



I.RND«2S0+1.RND* 



NCC#2.#3, 10, N 



•+*++++++-. DR Y2<26 THEN CALL DELSPRITEC#2 



1180 CALL PDS 
>140 THEN : 
1190 P2-P2- 
P2 :i IF F2<=0 
120O CALL 






IISF'LAY * 



(23.1 



1210 IF P2- 

1220 CALL KEY I 

1230 IF K*=: 

1240 CALL SOUND 

<#2.35.6. 

1230 CALL PATTERN 



P:>5IZE1 



7B0 RANDOMIZE 

790 P2=0 || DISPLAY AT(8.17)SIZi 

BOO G-30 :: Pl = l u DISPLAY ATC 

3J:G :: DISPLAY AT 14. 25) SIZE C 1 ) : 

BIO FOR 1=3 TO 13 II CALL SPRITE(#I.39. 1 

l.RND»250+l,RND»25O+l,5, 10) : : NEXT I is* 

CALL C01NCCALL.S):: IF S THEN BIO ELBE B 

20 



) CALL CHAR 



> CALL 

1,65,7.20, 



> CALL SPRITECt 
830 CALL SPRITE (4 
540 CALL SOUND MC 



1 CALL COINCCl 



1,33) 



,36.13.150.150) 



- 5-0 THEN 830 : 



OYST 
,-Y«3-H0.X*3*; 
50O0 THEN C1-CI+ 

240 ELSE 



65. "ooooooiooooooooo" i 



1FJ0 
-13, ■13,65, 
12BO CALL SPRI 
• 13,65,5,20,18 
2, •17,65," " 
1290 FDR dela: 
CALL DELSPRlTf 



13O0 GOTO 1130 

1310 CALL DELSPRITECALl 

"80C0EOF0F8FOEOC0",67, ' 



I CALL CHAR 



■ 1 1C070FFFF7OCOBO 



I M SPLAY ATc 



■ A-0 THEN 1100 



.12)SIZEI3>if 
.25>SIZE(3):f 
T(B.17)SIZE<( 



1340 C 
1340 r 
1350 r. 



DISPLAY ATIB.17ISIZEI* 
THEN P2-0 

: CALL MOTION (* 



1760. t 



CALL SPRITE 
GOTO 1140 
i CALL CDL0R(#3 
■ NEXT DELAI : 



ITE!«IO.65.7.20. 1 BO. 10.20. # 



10,5, #12,65, 7, J 



( NEXT DELAI I 



I CALL CHARC66. 



> CALL CHAR 
1600 CALL DELSPR 
1610 P2=P2-H 
ISPLAY ATCB.: 

1620 CALL CDL0R(»1. 1) :: CALL MOTION' 
.0);: CALL SOUND 12500. -7.0) 
1630 FOR 1=1 TD3 :: FDR DELAI=1 TO 
: NEXT DELAI 

1640 CALL SPRITE(#14.113,15.X1,Y1.5, 
15. 113.15. XI. Y 1.-5. 1. #16. 113. 15. XI. 1 
.-10) 

1650 CALL SPRITE<»17.113. 15.X1.Y1.2, 
#18.113.15. XI. VI, -1,-10, (119.113, 15.) 
,S. 2. #20, 113. 15, XI, Y I, 4, -2) 
1660 NEXT I :: CALL DELSPRITECALL) 
1670 Cl-Cl-1 :: IF C1=0 THEN 1810 
16B0 IF Pl=l THEN BIO :: IF Pl=2 THEN 96 
:: IF Pl=3 THEN 1010 II IF 
060 :: IF Pl=3 THEN 1100 :: ] 

1690 P2=P2+200 :: N1=N1-1 :: IF N1=0 THE 

N I860 :: DISPLAY AT 18. 17)SIZE 16) :P2 

1700 CALL PATT£RN<#3.91):: CALL PATTERN! 

C(4.91)i; FDR DELAI = 1 TO 3 :: NEXT DELAI 

:: CALL DELSPRITEC#3.#4):: SOTO 13B0 

1710 CALL PATTERN1#3.91):: CALL PATTERNE 

#4.91):: FOR DELAI«1 TO 5 :: NEXT DELAI 

:: CALL DELSPRITEl#3.#4):: GOTO 1B60 

1720 CALL CLEAR :: CALL CHARSET :: CALL 

DELSPRITECALL):: CALL SCREENU4) 

1730 DISPLAY ATC10.12)l"BRAVO" 

1740 DISPLAY ATI15.1):"V0US AVEZ REUSSI 

UN EXPLOIT QUI RESTERA DANS L'HISTOIRE 

DE" 

1750 DISPLAY 

1760 FDR T=I TO : 

OR DELAI-1 TO 50 

17B0 P2=P2+; 



22.1 



CALL SCREEN (1 



-7 THEN 1790 i 



6S,"7F3F1FOF07030100".102 



64. "BOA0ABAAAAA8A0S0" ) 

=6 ■: CALL COLORtS. 15,5): 
231SIZEC1):"6" 



940 CALL JOYST(l.X.Y):: CALL MOTION(#1.- 
Y»2.X»2)i: GDTD B60 

950 H=30 :: DISPLAY AT (7. 7> St ZE (3) : H 
960 CALL MOTIONCWl.O.O):: FOR DELAi=l TO 

500 :: NEXT DELAI :: DISPLAY ATI4.25ISI 
ZEC1): , '2" tt Pl-2 

970 CALL C0L0R(12.14,14):: CALL COLORtlO 
.5-14);: CALL C0L0RE3, 14. 11) 
980 CALL DELSPRITE(#1.#25):: CALL SPRITE 
C#25. 69, 11,60,75) 

990 FOR N-3 TO 13 :: CALL SPRITE(#N, 42, 1 
4,RND»250+1,RND»250*1.10.13):: NEXT N :: 

CALL COINC(ALL.S):: IF S THEN 990 ELSE 
830 



: DISPLAY 

1360 CALL SPRITE <«1. 36, 15.130,130) 

1370 CALL SPRITEI#5. 102, 14.150.23) 

1380 CALL SPRITE(#2,44.13,RND»230+I,RND» 

1390 CALL DELSPRIT£<#11.#12):: CALL SPRI 
1,0,101 
) CALL C0INCC#4.»2. 10.L1):: IF LI THE 



1BO0 M!=S j: call 

1810 CALL CLEAR : 
CHAR»SET II L»»" 
1820 DISPLAY ATdi 



1690 



1420 CALL POSIT 
OR Xl>157 OR Yl 
1430 CALL POSIT 



ONCai.Xl.Yl) 
26 OR Y1>2K 
ONC#10,X4.Y4 

•4. #2, 10, LI) 



DISPL 

»1 T 
2318 

CALL COLOR 110 



1000 CALL DELSPRITECALL) 

AY AT(7.12)SIZE(3HM 

101O CALL MOTIONC#l.O,0):: FOR DELA; 

O 300 :j NEXT DELAI II DISPLAY ATC4. 

1ZE(1):"3" II Pl=3 

1020 CALL CDLDRC12, 3.3)1 

.5.3):: CALLC0L0RC5.13.il) 

1030 CALL DELSPRITE1#1.#25):: CALL SPRIT 

EC#25.69.5,60.115) 

1040 FOR Y"3 TO 20 : : CALL SPRITE(#Y.41 . 

3.RND*25Otl,RND«25O+1.10,15):: NEXT Y ll 

CALL COINC CALL. Bill IF S THEN 1040 ELSE 

830 
1050 A=30 ji DISPLAY AT I7.25)SIZEC3> lA 
106O CALL HDTI0N(»1.0.0):: FDR DELAI=1 T 
D 500 :: NEXT DELAI :: DISPLAY ATI4.2S1S 



1470 CALL P0S1 

210 THEN CALL DELSPRITECM6: 

14B0 CALL COII 



>140 THEN 1000 

-Y*2,X»2,»2.Y»3- 
#5.-Y«2.5t6,0) 
1510 P2=P2-2 :: 
P2 :: IF P2<-< 
1520 CALL KEYC1. 
1530 IF K=1B THi 
1540 CALL SOUND 



1 CALL COINC 



IF Ll THE 



2 OR Y10<26 THEN CALL DELSPRITEC#4 
460 CALL POSIT-IDN(#S.Xll,Yll>i: IF 
O DR '11-135 THEN CALL LOCATEC#S.X 
:0N(#6.X12,Y12>il IF 



1B70 CALL CLEAR 
DELSPRITECALL] 
1BS0 DISPLAY A' 

1890 DISPLAY A' 



> I SPLAY ATC 9 



'10 DISPLAY * 



SPRITE (#27. 70. 2,23.31, 
CALL SCREEN 18) :■ CALL 
.2):"UNE AUTRE PARTIE 



L»O"0" THEN 1830 ELSE 410 

• 10 i: CALL SPR1TE(#27.70.2,25,31 
GOTO 1380 

CALL SCREENC4):: CALL 



i CALL COINC 



l(#27.X20.Y20: 



' ELSE '1400 



: S-0 THEN 1940 



1 CALL SPRITE 



^SPECTRUM 



1 lr RNDltJ.05 THEN RETURN 



Suite de la page 4 

AUERTIAA L0R-3UUE uuua N'AUOCZ I 
L'JS DC MISSI-LE5 1 PAUSE 1** PI 

INT AT 9.1*. ■ TfiBEZ INTER I 

Ruse 9 cui so sue so3B print 

UOICI LE3 TOUCHES POur 

PRINT PRINT " 8-- 

R TIRER. |— 

A CESCENDRE. 
3013 PRINT AT 10,8, "31 L-uua vuwi 
EI REDEriNIR LES T0U-CHE5.RPRUYI 

3317 PAUSE 

32i2 SW S ,i, ..,.- n B TMK-Y..R- 



satti PRINT P.. .... 

31; INK. Bi"l* 

58SS PRINT RT Btim 
,31, INK. 6; -i~ 
S««3 RETURN 

60se restore saee 

READ a: POKE USR ' 



)SERT 

>5ERT 

)3CRT 



m i 



i,»i; rut 

PRINT 81, 



BIN 008020(10 

BIN 00001000 

BIN 00000000 

BIN 00000000 

BIN 00000000 

OIN 00100010 

SIN 000BI000 
■0 TO 7 READ 

bin aaeeeae 



6031 I 
6033 c 
6033 [ 
6031 C 

6036 t 
D035 C 

6037 C 
6039 [ 



A DIN 0B1B1B00 

H BIN 00000100 

I sIn iifssi§» 

I j.0 TO 7: fiCAC 



I 00000000 

J TO 7 ReAC 
POKE USR ' 

6071 DATA BIN 11000011 

607H OATH BIN 01111110 

6073 DATA BIN B1111110 

6074 OATA SIN 11011011 
607B DATA BIN 00011000 

6076 DATA BIN 00100100 

6077 DATA BIN 01000010 
607B DATA BIN 10002001 
6080 RETURN 



.300 P6S f.6'T0"ls 



7000 CL3 : GO SU6 B630 



■ 16, 21, FLA5M 



60*5 DATA t 






■ 11* f 









; ! Vn ? 



OD TO 7014 
7006 IF in; 
CO TO 7019 



GO To 7010 



IEN GO SUB 7017: 



1 130 THEN SO SUB ■ 



BIN 0000000 
BIN 0010200 

BIN 08000B0 



4 BIN 00180010 

1 BIN 08181010 
i BIN 18080801 
! BIN 08081800 

1 Sin 18080880 

SIN 00101000 
IN 00001001 



60 * DATA I 



! THEN GO SUB 7013: 



DATA 



BIN 18001010 

Bi> 01010100 

08080808 



61S0 PRINT ' 
6160 PRINT ; 



6170 ( 



BEEP Jtjstjsm 



DATA BIN 00000008 



DATA SIN 0001 



617i PRINT INK I, FLASH 1 , AT 11, 

IB, "tapei lor «fi«";ftT l3.l3;-'lou 

6173 PAUSE 8: PRINT INK 0] FLASH 
B,RT 11.10,"llPtZ »ur ufl«";AT 1 

61S0' LET «.13 LE 
61«B FOR (-0 TO 1 



7013 PRINT CONCLUSIONS' PF 

■■CJOTRE PERFOPMONCf N CS~ Pfii 
"■■■:■■ ■:.:j\. ■■...:.■■ S,.-K-^-:' ■' 
BEHiJCOUP Mieux." RETURN 

701* PRINT -CONCLUSION " Pf 
UOTOE PtB^aRHANCe EST MINAf 
U0U5 POUUEI 5UREMENT FAIRE 



'■■;'-; "■£---■;[■:"■«;;■:« 



EST PAS MAL 



]-i"-j.i£j 



WORP MASTER 



La vie depuis longtemps 
D'espoir etait peine 
Lorsqu'un jour du neant 
Le monstre resurgit. 

Florent COGNEAUX. 

Mode d'emplol : 

(JOYSTICK ou CLAVIER ) 

Tapez tout d'abord le programme BASIC d' implantation du langage 

MACHINE et sauvegardez-le apres avoir effectue une minutieuse 

verification des codes. Ce programme n'aura d'autre utilite que de 

fenerer. a la suite du programme principal, un fichier BINAIRE. 
apez ensuite le programme WORP MASTER et sauvegardez-le. 
Entrez votre premier programme et apres son lancement. placez la 
lete de lecture de I'enregistreur cassette a la suite du programme 
WORP MASTER. Frappez alors [Instruction suivante afin de sauve- 
garder voire fichier BINAIRE : SAVEM "WM", H7E94, H7FFF, H00O. 
Le chargement de ce fichier BINAIRE (WM} dans la memoire vive 
du T07, ne sera effectue qu apres r^ponse a une question prealabie 
apparaissant a I'ecran lors de I 'execution du jeu : BINAIRE 
CHARGE ? (O/N). II est evident qu'au tout premier lancement. la 
reponse sera N et voire magneto devra rester en position PLAY. 
L'action se derouie dans neuf salles successives. la septieme abrite 
WORP, un monstre fabuleux qu'il vous faudra detruire. 
SALLE 1 : 

Blotti dans voire capsule, vous devrez penetrer dans le conduit ver- 
tical en evitant si possible les tirs models des cellules placees a 
I'ouverture. L atmosphere de la salle est remplie de nuages radioac- 
tifs invisibles. Des capteurs situes sous voire capsule, emettronl un 
leger bruit en cas de detection. Des lors, il sera prudent de stopper 
votre descente et de vous deplacer lateralement. au risque bien sur 
de vous (aire desintegrer par un nuage non decele. Sain et sauf. la 
descente vers le conduit inferieur vous fera deboucher dans la se- 



THOMSON T07J07 70. 




conde salle. 
SALLE 2 : 

Vous devrez franchir la breche mobile du milieu de la salfe et rejoin- 

dre la sortie situee a droite. 

SALLE 3 : 

Elle est jonchee d obstacles rectangulaires qui masque nl deux arai- 

gnees geantes plus ou moins affamees selon le niveau atteint par le 

joueur. Vous devrez parvenir a Tissue droite de la salle avant Que 

plafond et sol se referment sur vous. 

SALLE 4 : 

Reptique de la salle 2 avec cette fois, 2 breches mobiles a traver- 

SALLE S : 

Vous devrez traverser un tunnel aux murs dechiquetes. en evitant 

des particules d'energie morielle. 

SALLE 6 : 

Replique des salles 2 et 4 avec cette fois, 3 breches mobiles a 

traverser (GASP I). 

SALLE 7 : 

La salle du monstre I Celui-ci, tapi dans un ascenseur ( ?). se livre a 

des aller et retour entre les extremites inferieures et superieures de 

la salle, masque par quatre ecrans jaunes. 

Cette salle est en deux parties : 

la partie gauche est criblee de mines (points bleus fonces) et les 

parois de la partie droite sont jalonnees de cellules irradiantes mor- 

telles lorsqu'elles emettent une lumiere rouge (quel bonheur !). Vous 

devrez vous placer face au monstre et attendre que celui-ci se de- 



masque pour lui decocher un tir model en appuyant sur ESPACE. 
Dans ce cas, votre capsule regagnera vivement la partie gauche de 
I'ecran. II vous faudra au plus vite, rejoindre la surface en accedant 
a la huilieme salle. 
SALLE B : 

Vous devrez traverser la salle 3 en sens inverse. 
SALLE 9 : 

Salle du debut de jeu que vous devrez parcourir en sens inverse. 
Cette fois, vos capteurs indiqueront la presence des nuages models 
au dessus de vous et vos flancs seront toujours aussi vulnerables. 
De plus, une desagreable surprise vous attend en haul. En effet, 
Tissue risque d'etre situee. ..ailleurs. 

Vous disposez au depart de 5 vies et d'un credit de 10000 points. 
Vos vies epuisees. un tableau apparaitra vous indiquant les demiers 
niveaux et score atteints. Vos points qui s'amenuisent a chaque pro- 
gression vous obligeront a ne pas perdre de temps en route. 

A Tintention des non possesseurs de JOYSTICK, le programme uti- 
lise pour les deplacements de la capsule : 
Y pour monter, 
H pour aller a gauche. 
B pour descend re, 
G pour aller a droite. 

Une frappe unique provoque un deplacement continu dans la direc- 
tion souhaitee. La frappe dune touche quelconque (OU ACTION) 
stoppe toute progression, Voici un exemple de prog ram mation efficace 



1 clear, &h7e95:forn=th7e95 t0&h7ffe: read 
r:p0ken,r:next 

2 data&hfe, &h7e, 233, 6h8e, (.h7e, kheb, s.ha6, 
*ei ; 886 1 86. 4 hai.se 16000000, 6H26,«.h42,S:Hi 
f. 4^30,1^03, 0,40. (.hi f.sh03,&h8c,&h7e,&hf 

3,&H20,£.HEE,SHFC..VH7E,&HE9,]iHC3,8,(""~~ 
HFD, 126. 233, &HFE. I H7E, *HE9, S.H8E, *H7E, &HE 

b. ;hh6 . &bi 0068800, &ha7, i bi leeei 09. in if, t 

,HC3,8,&H2B 

3 DATA8,H1F,&H03, tH8C. S.H7E. I.HF3, tH2D, &HF8 
,H83,»>H56.S.HA6,;iH2D,?.H5,t,Ha6,t.H83, 

SHB7,t.H7E, S,HB6,f>HlI.&H33,S:H4A,!.H26,£H2E, 
5. i.H86 . t HC3. IHB7, ! H7E. EHB0. S.H39, tH86, 1 , & 



HB7. 



,*H7F 

bbbbbi ~ 



fcBl 



:H40,99,IH39 

SB, 0,8, 66, 66.94,98,92.62, 8 

AS.H3E, S.H4F, «HA0, tHCE, 1H4F, 5HAB, 1H7F 

,HFF,KHA7,&B 188888 18, SHA 

88ee00,&HeC.S.H4e,B,tHI2,l.H12,»H12, 

" "H2.tH]2,t.H2E,S.HEF,«,H39 

H7F, &H4A, 8.H7F, IH7F, I.H4C 

,H8E,8H7F,iH4E,t.HEE,iBie 

6.0,K.HH7.f,Bliee8100.!.HlF,S,H38, 

&.B18880981,t 1 HlF.SH83,&HB6, 12?,t,HA7, 

B80180,&H1F. . ._ 

" A $.81 000900 l.iHED. SB 1090 1006, &HFA,&H 
e.SH«3.tB1099I00O.i;HiB,lH26,!.H6,t;HEC,(.e 
,&.HED,8,BlB00lB98,«.HFA,tH7C, 
*H4t>, mie.SHBC. IH7F, tH4C, SH2E, 1HD4, 

&H72, 1 . E.H98, 1 , &H88, S.H 
56, S,H6B, 1, 1HE0, 1 . 8:H98, &H4E, &H9C. 1 , tH90, 1 
. S.H68, IH5B, 1.H6D, 1 . S.HE0, 1 , LH90, LH44, tH76, 
1.SH90, l,6HBe.tH5E,S,HBfi,e.H44,&H72.8,0,tH 
43. S.HBB, 6H5B. 5H6B. 8, 9, S.H5E, «.H8C, IH44, I.H7 
A, B, 0, !h43. 4H0O. 1H5B, 8H6&, 0, , IH5E,SH8E, 
&H44,&H76 

9 DBTrti.H8E,&H7F,£45,IS.HI9,&HBE,m7F,247,t 
HN: l t,B10900000.£H'47.iB:0l09000 l S.HBC l t,H7F 
,249,*H2D,lHF7,*H7C,6 ! H7F,252,iHBE,f.H7F,E 
51 ■ SH8C, 8, 4H28, &H2D, 1H27, J.H7F, S.H7F, 252, l 
HFC, tH7F, 245, KH83. 0, &H28, 1.HFD, tH7F, 
HFC,IH7F,247,1H83,B,&H28,6HFD, tH7F, 
HFC,IH7F,249 

10 DATAt.H33,0,&H28.i,HFD,&H7F,249,t l HFC,&H 
7^.253, S.H83, 0, t.H£3, S.HFD, SH7F,253, 1HFC, IH 
?F.253,tH83,»H9.f,H38,8;HlF,lH81,tH86,0,t,H 
M-.5B13e0eiBe,&HlF.i;m8.S,HC3,B,tH£8,tHlF 
. :.HC1 .S,HBC,lH7F,253.t.H2D,(,HF8 

11 [■flTft tHB6,6,H7F.255.6HC6,*H28.iH3D,SHF 
3. S.H7F, 253, 1H83, 8H9, tH33, &H1F, tHBl, &H86, 
1H85, &Hfi7, t,B 1 0B00800, SH39 

12 DfiTfltH52, 1H99, S.H52, &H9B, SH5F, &H48, 0,0 
,5H5D,iH87 



247,1 



IS CLEnR15,iH7E34.2:LULHTE0.e,0:CLS:SCRE 
EN6,0,B:L1NE>56.7£.-'S. 1 12 1 : LIME-' 72, 64 i 
I LINE- (48, 112>:LlNE-(184.64>:LINE-(329,6 
4>i80XFs96,BB>-' 300. 96), B: B0XF<96, 96>-U 
52. 104.',0:BOX'96.8e:-'144, 104) J BOX ( 168, 8 
8.'-':21b,96):B0". MC.ss ■ - - 2SS. 96^ : LIME1 16 
8,96)-<16B,104> 

26 LINE', 168, 96 --(320, 130> : L INEC248, 96>-( 
248, 1 84 /:flTTRBl:FOBN=0TO£7i COL0R5: LOCATE 
N, 18!PRINT"na": J CDL0R4; PR INT-st"; : CDL0P7 
:PRINT' , er , ':NEXT:FORN=0TO26:PSETCN. 18:'" " 



:FOPM = lTO20:NEXTI1,N:fiTTPB0: LINEt 46,32)-! 

^■-3£.'.3:LINE'5c.E£ ■ -< 56, 42 :■ . 3: LINEI36, 1 

2-'76,52>,3 

">:■ LINE:36,52:-->:7B,12>.3:PEFINTft-Z:L0CflT 

Eh.i3;:0L0R7iPRINT"BINAIRE CHARGE <0'M) 

:";h*=INPUT*(1 :< i 1FA* = "N" THENL0ADP1"Un" ! P 

= ij:' i =^:s:i=0:S! = 10000:1>EFCR*'0'j = 0,36,24, 

: r, ;.2a,I'i^.24.aELiEPLrtV"L24PP":GOTO700 

41? :■ = [' + ! :i:l;:L[ii:hTEi:i..?, 1 j:SCREEN0!L1WEC9, 

■-■ 328.200 ■■:LINE'y.£ , ft'3.'-<' 328^8 JsLlNEO, 

■';'-'-' 326,99), I»T(D*.6:'*[:F0PN=8T0I2:C0«S 

OlEN.U: 3CREEN6!CONSOLE24-N,24-N:SCREEN6i 

':jii:C-LEH,tj:SCREEN0:CONSOLE24-N,24-N:SCRE 

E,\: : ML: - : rnNiOLE". £J : hTTPBl : I Ft |yTHEN(J = 

IB 

50 C=7!LINE(0,99)-C320,99),IHT(D*.6>+1! 

ORW=0TO7:COLORN,C:LOCHTEll, l£iPRIWT"CHA 

LE*t6E"iC = C-l:NEXT:LINE<0,99)-!320,99),I 

TiD». 6) + l: LOCATE 17, 17: COL0R5: ATTR8. 1 : PR 

NT[>:ATTR88.8:PLAV' , T^04L12F«SOiLAtPL24SII 

9LA#L3PL9S0tFARE#D0L12REiPFA":B=B:SCi=S 

!*S | :S!=10000 

68 B*='"JB=B*U0KB COTO220. 490, 430, 490, i 

88,490,560,430,220,40 

76 IFPOIHT(X*8*4,Y»8*4)O6THEK170 

80 B*=INKEYt:IFA* = , '"THENA*=B* 

99 ST=STICK(9>:PT=STRICCB) 

100 IF ST=1 THEM rtf="Y- 
110 IF ST=3 THEM A* = J, H" 
120 IF ST=5 THEM A*="B' 
130 IF ST»7 THEM A*«="G" 
140 IF PT=-1 THEN A*=* " 

150 Xl = (A**"C")-<:flt s "H">:Vl = (A*=''Y">-<«* 

-"B-):PSET<X,Y>' ", 2: IFSCREEM(X+X1, Y+Yl ) 

=32THENX*X+Xl:Y=Y+Yl ELSEIFSCREEN'.XtXI, \ 

+YIX>127THEHX=);+Xi:Y = Y+Yl:COTOl?0 

160 PSET(X, Y)GR*«9:',6:S'=Si-5:Bt=.A>;:0NB 

COT0269, 520,458. 528, 6 ,528. 6 10. 458.539,48 

178 PSET(X,Y)" = ", l,0:LIME'0,Y*8+4>-i;32B, l 

Y*3*4),3:PLAY' , L2TlSILAS0FArlIRED0T20»7"IL« 

&OFHniREDOT4O3SlLfiSBFAf1IREDOT502SILAS0FB 

rlIRE()OT601SILASOFfil1IREDO , ':EXECS.H7EF3:SCF 

EEN,,7:SCREEM7,7!CLS:FORN=0TOi5:X=RNDi32 

0iLIMECX,0)-(320-X,2B0) 

130 N£XT:P0KEfcH7EFD. 192: EXEC&H7EF3: SCREE 

MB, 0,9:LINE(0, 100)-' 320, 100) : C=7: C0SUB21 

e:FORH=0TO5:Y=RNC>I50:LlNE(0,75*Y)-< 320,1 

25-Y):MEXT:C=6:GOSUB210:C=3:GOSUB21B:C=l 

:GOSUB210:CONSOLE0,24:CLS!ATTRBi:POKE&H7 

EF0,255 

190 V=V-l:IFV=0THEN660ELSE:FORM=0TO50:C= 

C*l:IFC=7THENC=0 

200 C0L0RC!L0CATE16.12:PRINTV:MEXT:j=B-l 

:B*="!G0T069 

219 F0RM=12TD24:C0NS0LEN,N:SCREENC'CON50- 

LE24-N, 24-M: SCREENC : C0MS0LEN,NJ SCREEN0: C 

0MSOLE24-M,24-N:SCREEM8: MEXT: RETURN 

228 Z=44:M=36:CLS:SCREEN2:BOXF<0,32)-(13 

5,55>:B0XF<176, 32>-'32B, 55) : M=7: F0RN=14T 

O2STEP-2:LINE(0,n)-'N.ri'CHR*il27:iiLINE<4 

e,H)-<;38-«,NJCHR*( 127' :M=H + l: MEXT: fl=14:F 

OftN=4TO18STEP2iLINE'0.M)-(N.H>CHRJU27): 

LINEI48,M)-<38-N,Pl>CHR*' 127) :M=r1 + I : MEXT 

230 BOXF<0, 176)-(320. 192): LINE! 19,22)-<4 

8,22)" ',,e:DEFGR*(l)=8, 126,68,255,255,6 

0.126,0:LIME(17,4)-(17,6)GRf<l),7,0:LIME 

<21.4)-.:21,6)GRI(1)!LIME(0,3)-C0.e ■CHRH 

l£7S0:LINE<0,8>-i49,0,CHR*i.l£7>:LINEf49 

,9)-(48,3)CHR*U27):X=RND»38*l:Y=2:F0PN= 



<%cgMH^ 



8T0I>«5 

248 L=RM0»48:fl=8*RND*ll:IFSCREEM(L,n)=32 

THENPSET(L,H)".", 0,0: NEXT ELSE248 

259 IFB>1THENLINE'16,4)-C16,6V ",2,2 = PS 

ET':39,22)CHRSU27),9,9:X=38:Y=22:PSET'X, 

Y>0fi*ce),6:G0Tr,?RELiEF-SET 1 .:-;,V-GR*(e)/6 

269 U=U+8:IFU>52THEMU=36 

279 Z=Z+8!IFZ>52THENZ=36 

2B0 LI NEC 144, W)^l 167, U) . 3: LIMEI 144, Z)-(l 

67,Z>.3:LINEi:i44.W,-( 167, U), -1 : LINEU44, 

Z>-C167,Z),-l: IFSCFEEN(X,Ytl)=46TKENPLAY 

"L5T5D0" 

c'.-0 1FX = 39THEN68EL3E70 

300 L=100+D»15:U1 = 1-^1> 16 > : CL5: SCREEN4 i F 

ORM=0TO320:LINE'N. 1I9)-(M, 1 19+RND»10): LI 

ME>N,200)-<N, 200-RND*10):NE):T:BOXF<0,0>- 

■ 7Eti, ll?i:x=2:Y = 20i»ESTORE308:FOftN = S.H7rF 
Z T0i.H7FFE:RErtDP:FQiEH.F:NE.-:T:rHTA82, 153 

■ t'S, 1^2.95.c4.y.8,93,135 

318 0J=IMKEY*:lFAI = ,,u THENAf=B* 
328 ST = ST!CK(8):PT=STRIG<0:' 
330 IF ST=1 THEN A*="Y' 
346 IF ST=3 THEN At-"H" 
356 IF ST=5 THEN A*="B" 
368 IF ST=7 THEN Af="G' , 
376 IF FT— l THEM A«=" " 

7S6 Y = Yf -..fits" V")-! h* = -'B" .>:X = >:+ t.H* = "G" AND 
^IFSCPEEN'X.V ■ :-32THEN179 



IKB-1) STEP2:L: 
!,0:LINE(N*8,0)- 
il:PSET(X,Y)GR*' 
-8:B0XF<8,22)-<: 



■(37,7 



390 PSET' 
7FFF,RND«58 



.')GR*C9i,fc:lFRND-'UlTHENP0KES,H 
I FX=39THEN3 I =S ! *L : GOT068ELSES f 



416 IFL=8THEN68 

428 B*=Af:PSET<X,Y)" ",4:P0KE»,HE7C3, 1 :EX 
ECS,H7F8B!G0T0318 

4 38 CLS:DEFGR»K1)=66, 36. 219,68, 98, 165,66 
,129:FORM=9T048:LIME(N,6''-'M.PNr*3 CHRI' 
127), liLINE(N.23:'-CN.23-RNl>»4)CHR*<127): 
NEXT!BOX<8,8)-(40.23 ,,;hfi' 1E7 ■: PSET' 39, 1 
1)- °!FOR«=5TO17STEFi:FOR,-l = 7-ui7STEP10!L 
INE<(bN)-CM*(7-<D/2) ■,M)CHRt<127),5:NEXT 
:IFN-=9THENM=n 

440 NEXT:L=ll+D«3:X=RND»lS-l:Y-ll:Z=39!W 
=ll!PSET<X,Y)GR*C0),6 

450 L = L*1!LIME(0,D-<320,L).4:LINE(0, 183 
-L)-(3£B,183-L),4 
e& P3ET ; ;,lJi" ■:PS£T(2,22-H)" ":IFRND>. 



.-[. 10ANDSCREEM(Z-(X: 

:x<z> 



nz=: 



:<Z'.u>i 



127THE 



470 IFRND/.6-D'10ANCSCREEN(Z,W-(Y>H)*(Y< 

U)/(>127THEMH=H-(Y>M)+<Y<M) 

4S0 PSET(Z,»)GRf(l),2:PSET(?,22-U)GR*U) 

.2: IF)^;9THEN60ELSE1FPOIMT<X»8,Y*B)O-1O 

RP0INT<X»8+7,Y«8+7>',>-lTHEM17BELSE88 

498 CLS:SCREEN2:DEFGR*<1)=178,B5, 170,85, 

178.B5, 170,B5:N=B:FORN-1BTO2STEP-1iLINE( 

M,2)-iH1,N)CHR*(83),7:LIME(P,29)-(ri,22-M> 

CHR»(88):LINE(39-H,2)-(39-N,H)CHR*(8B)!L 

INE'39-n,28)-(39-fI,22-M)CHRS(e8)!n=m-l:N 

EXT:LIME(8, l)-(39, l'GRS(l), 1,2= LINE (8, 21 

j-(39,21)GR*(l) 

580 POKEtH7F48,B-l:L=&H198+(10-D)*4B:FOR 

M=tH7F58 TO 1H7F69 STEP12:P0KEN, VAULEFT 

t(HEX*<L).l)):Cf= ,, lH-+RIGHT*(HEX«(L),2): 

POKEN+l,VALfC*):MEXT!L=L+40!FORN=tH7F52 

TO &H7F6B STEPI2:P0KEM,VAL(LEFt))<HEX)><L> 

,l)):C*=-lH"+RIGHTtCHEX*<L),2):P0KENtl,V 

AL(C*):NEXT 

518 LINE<ie,2)-(29,2)GRt<l):LIME<18,20)- 



<29,28)GR»<1):F0RM=13T0. 

ME<N,1)-<N,21)CHR*<127: 

'N»3, 288), -1: NEXT: X=l:Y= 

8:',6!PSET<e,ll>CHRf(127 

9,24)CHR*U27) 

528 COLOR2,0:POKEtHE7C3, 

0IMT(X»8+l,Y<8)O-10RP0: 

>-lTHEN17BELSEIFX=39THEM68EL5EB8 

530 IFY=7THENLINEd44,36)-(I67,36),3:LIH 

E( 144,44 )-( 167,44), 3: LINEC 144,52>-< 167,5 

2>,3 

548 IFSCREEN(X,Y-l)=46THENPLfiY"T5L5D0- 

550 IFY=1THEM6BELSE7B 

568 CLS:SCREENB,0:DEFGR«<1)=179, 85, 170,8 

5.178, 85, 170,85: BOXF (8, 1 )-(3, 1 1 )GR«(1 ),6 

,3:B0XF(B, 13)-ij,£3)CRI: 1 ) : BOXFi 13, 1 )-(3 

S,6)"X ,I .5,8:B0XF(18. 18>-<38, 23) -X" = BOX(0 

,0)-<39,24)GR*(I ).6.3:DEFCR»<1 " _ 

219, 153, 153,219, 195, 231: LINEU 

)GR*(l),7,fl 

57B LINE (13, 17)-' 37, 17)GR*( 1 ) : FORM=9T016 

STEP2:LINE(35,N)-t37,M)CHRJ(127),3iMEXT: 

FORN=8T0D:LIH£(ie,N)-'37,NJCHRI' 124- r i:L 

INEi.l8,24-M)-<37,24-M)CHRt<l24>:MEXT:F0R 

N=BT0D»B9: PSET (RND«1B3*32, RND* 168*3), 4: N 

EXT 

588 LINE(38,7)-(33,I7)' ',£: PSET(3S, 7>'8 

" : L I ME < 308, 56 ) -< 388, 143), Si PSET I 368, 58 ) . 

-l:P0KEtH7EE?.?-H4S:Fi:il.E,;H-EEA,tHE6:X=4:Y 

= 12:PSET(X,¥)" " 

596 X1 = IHT<RND*2): IF;:i = l THENX=X+X1 : PSET( 

X.Y>" -:IFX = 17THEKN=37:PI=37:X=l:Y = 12:PSE 

T(X,Y)GR*(6),6,0:t;OTO6ieELSEYl=FIX<RMD«3 

)-l:lFY*Yl>lANDY*Y1.23THENY=Y-<-Yl:PSET<X, 

Y>" ■ 

606 G0TO598 

618 PSET(M,7>GRf' 1 i . 7. 8! PSET(N, 17)GR*(1) 

:M=M-l:PSET(H,7)GR*(I),7. 1 :PSET<M, 17)GR* 

■ 1 -:N=M:IFH»X THEN17BELSE IFH=18THENH=33 

628 IFA*=" " THENLINE(X*8+8,Y«+4>-<.(X+l 

)*3+7,Y»3*4),l:LINE-<X»8*e,Y»8+4),-l 

638 POKEf,HE7C3.l:E;:EC^H7E95:lFPEEK((«H490 

0)=ITHEN649ELSECOLOR.0:GOTO70" 

648 SCREEN, 7,7: PLAY"05T1L5S I LttSQFAIIIREDO 

SILHSOFAHIRE0OTlO4SILASOFAniR£DO03SlLAS0 

FAMIRED005SISIPPSILASOFAMIRED004SISCI1IDO 

O3SISOnID002SIS0^11DOT3OISILAS0FHf11REDO' , : 

SCREEN7,9,9:PSET():.V>GP<i(e),6:LINE<6,Y)- 

a7, Y>" ":F0RN=X T01STEP-1 1 PSET<N-1, Y)GR 

*'.0):PSET(N,Y)- ■ 

650 FORfld TO 10: SCREEN, . 7: SCREEN, ,0:NEXTH 

,N:G0T068 

668 AS=INKEY»:CLS:M=10e:3CREEM2:FORN=lTO 

iee:PSET(RND*32e,RNP»20B:,7:NEXT:LINE(B, 

100)-f32e, 188). 1 : LOCATE 14, 5 :ATTRBl: COLOR 

6:PRINT"MIVEAU":l::kTEI^. ii:C0L0R2:PRIMT 

"SCORE":L0CATE8,23:ATTRB8,e:COLOR7:PRINT 

"UME AUTRE PARTIE <0^N) ?" :C=0: ATTRB1 : SC 

!=SCH-<D-I>*ie808 

678 C=C+i: IFC=7THENC=1 

6B6 LOCATE17,8:C0L0RC:PRINT[>:LOCATE13, 17 

:COL0RC-l:PRINTUS I NG k #*••!• n ;SC!!A»=INKE 

Y»i 1FA*< ) " -THEM690ELSE678 

698 1FA*="N"THENCLS:SCREEN2:ATTRB8:END 

799 DEFIMTA-Z:DEFGRI 

55,24.B:D=B:V=5:SCi= 



+ FX702P 
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24! PHIMK1,6>;:6 
0T0 Z 

Hi PF:T C5S smiMi 
,5)"Sora z 

2C F!T at UIWK 

l,9)i«T 
244 FST CSK tlBtlCS 




245 pit tSE 2!ftt::6 
GTC2 



PRT flilCSR 4!MI 
D(1,M):KT 
PRT CSS 6i«Kl 
,4!iRET 

PRT CSR OTIW 
:4)itSR I2*.IB( 
!,4):RET 
PRT SS!B!;:80T0 
I 

PRT MiCSR \i;» 
IHdRET 
PRT M;CSP, 4I9! 
HCIG8T0 2 
PRT MitSS Slfit 
;fii;:60TI)2 
PRT BIICSR 12!fi 

*;mt;sotg i 



lit PPT CSR l!:M:B 

ET 
M =1! 

! 



C =1 



1.884643441883 



p 


» 


85 


88282828! 


O 


363585343! 


g 


t 


II 


1885878786 


(14 


485858737 


i 


6 


K 


311111183 


C5 


1183111133 


s 


! 


8) 


3 


IS 


4885858539 


i 


8 


18 


1413131312 


17 


2685858586 


ii 


! 


■1 


1M131583 


en 


4342418929 


y 


8 


82 


7.151(1583 


C9 


485658584 


H 


B 


14 


319181783 


» 


685858525 


M 


1 


84 


687878788 


1)1 


464544188! 


r 


8 


Hi 


2882828283 


S? 


4948478786 


7 


288 


It 


2423222183 


83 


319391983 


SKt 


| 


17 


2685858525 


M 


4651185146 


III 


112828281 


88 


989838S89 


85 


:::;T35: 


117 


48M5858! 


19 


1413131314 


M 


44 


»i 


887878781 


1* 


2728132827 




nun 


14 


£87878785 


CI 


2938313829 


M 


786 


ft: 


785858583 


C2 


332 


89 


667 • 



EXELABYRINTHE 



R6fl6chissez a deux fois avant de franchir 1'entree de 
ce labyrinthe, les epreuves qui vous y attendent ris- 
quent d'avoir raison de votre equilibre. 

Alain BARBIER. 

SUITE DUN' 75 



DATA 212300JOOO, Z3O0OO23OQ, 32 :40012 ) > , 3412) ) :400 , 3)0012) > : 4 , 43K5003300 
DATA 45H30025OO, 547600 :47A,5AOO:4?A?E,5E:47A?600,£.?Baooa7) 5, £50087)588 
DATA E887>5E:800,7650002E,OG, A5EB004500,Ae45006POO > eA3?QOSnOO,l>^3A009?00 
DATA )3[==873O0,)60Ot==8?3, )-?300r=-B,B>00C6= >G3 ,aSCE= )63O0,8E6SO0C6=> 
DATA = ) 1<002>00,=(K)Q04<00, ?jE4S04 ;00 , ?B4;00SPO0, 3:3800* : 00,384:003800 
,<7Cj : = B700, ( ;B700C; :=,<=00C; t=B7, ;<A:7"'e<00, t?00Al7?2-< 



'< 50003 << 



■B; 008763, : ;87E3B;! 



I7E3B; ,7:50002:00 



DESSIN DU COULOIR DE EASE 



i : LOCATE i 



. COLORC 



J; CALL COLORC 



CLS "BYC":CALL C0LOR< "OUB" ) : A»-RPT*( CHR*( '■ 
LOCATE (21, DiPRINT A* 

FOR 1-1 TO 10: J=21-I:K=2.I-2;At=RPT»<" >V 
PRINT CHfi*(21);[CALL COLORC'ORR" ) [PRINT Al 
NEXT I:CALL COLORC'ORR") 

FDR 1-11 TO 20:LDCATE < 1 , 1 1 ) : PR INT RPTK" 
LOCATE (1,20):PRINT CHR«<31 ) ;CHR*(33) 
FOR 1=3 TD 5:L0CATE <I,20):PRINT CHRt (34 ) ;CHR» (35) [NEXT I 

FOR 1=6 TO 20 STEP 3: Y-1 -5: J-INT< < Y.1 )»2/3) ;K=21 - J: J=2»J-2[CALL CQLORC'ICR" 
A*=RPT«(" ",J>:LOCATE (I,K):PRINT CHR*(23) j :CALL COLORC'OCC" ) [PRINT A» [ 
CALL C0LOR!"1CR") iPRINT CHR»< 24) [LOCATE (1+1 ,K-1 > iPRINT CHR»< 25) ;CHR»(26 > ; 
CALL C0L0Rl"OCC");PRINT A«j:CALL COLDfi( "1CR" ) [PRINT CHR*(27) ;CHR«(28) 
LOCATE (I*2,K-1)[PRINT CKR«<28> ; :CALL COLORC'OCC") [PRINT " "[A»;" "| 
CALL C0L0RI-1CR">iPRINT CHRK30) [NEXT UCALL CDLOR( "1BY" ) ; 1-19 
IF A=1 TH^N LOCATE (I,35):PRINT CHft*( 17) ;CHR«( 1B) ;CHR*< 19) ELSE 1-1*1 
I=1-1:IF B-1 THEN LOCATE (I,35)[PRINT CHR*< 14) iCHRK 15) ;GHR*< 1E-) ELSE 1=1.1 
IF C=1 THEN LOCATE (I,33)[PRINT CHR«( 11 ) | CHR»( 12) ;CHR*< 13) 



5ETURN 



OESSIh 



1'UNE PQftTE 



COSUFJ 179 

CALL COLORC'Obb")(FOR 1-3 TD 17:L0CATE (I,13):PRINT ftPT*(" ",16):NEXT 1 
CALL C0LOR("1bC"):FDR 1=3 TO 17:LOCATE <I,20):PRINT CHR« (34) jCHR»< 35) 
NEXT I:LOCATE ( 13, 22) :PRINT CHR»<37> [LOCATE ( 14 , 22) iPRINT CHR»(3B) 
L*="VOUS ETES DEUANT UNE PORTE" : GOSUB 243:RETURN 

I OESSIN COULOIR A GAUCHE 

GOSUB 173 

CALL COLORC'Obb">[F0R 1=5 TO BtLOCATE (I,1):PRIMT RPT»<" ",ie>:NEXT I 
FOR 1=3 TO 17:L0CATE (1,13) [PRINT " ":IF 1=11 THEN CALL COLOR< "OCC": 
NEXT HL»="CONTINUEZ OU TOURNEZ A GAUCHE" :GDSUB 2*3iRETURN 



GOSUB 179 

CALL CDLOR("Obb"):FOR 1-5 TO B:L! 
FOR 1-3 TO 17:L0CATE (I,25)[PRIN1 
NEXT I[L»="CONTINUEZ OU TOURNEZ ( 

! DESSIN COULOIR PERPENOICULAIRE 



COSUB 173 

CALL COLORC'OYY"):LOCATE (1,19):PRINT " 

CALL C0LDR("0bb")[FOR 1-3 TO 6:L0CAT£ (I, 

FOR 1=7 TO 14iL0CATE (I,15):PRINT RPT»(" 

IF 1=8 THEN CALL COLORC'OCC") 

NEXT I:L»="TOURNEZ A GAUCHE DU A OROITE": 



;ATE (I,25):PRINT RPT»(" 
" "I IF 1=11 THEN CALL i 
DROITE":GDSUB 2*3:RETURN 



i 243:RETURN 



DESSIN OUBLIETTE 



GOSUB 17S 
CALL COLOR 
CALL COLOR 
CALL COLOR 



FOR 1=15 TO 20:L0CATE (I,11):PRINT RPT«<" ",20): 
FOR 1-15 TO 19:L0CATE (I,13):PRINT RPT»C M j12): 
LOCATE (20,14)[PRINT CHR»<23) i :CALL COLDRC'OBB"; 
PRINT RPT«(" ",1Z)|:CALL C0LORC1BR") (PRINT CHR*<24) I PAUSE 2 
L*-"UOUS TOHBEZ DANS UNE OUBLIETTE" :COBUB Z43iPAUBE 1:CALL COLORC 
A*=RPT*(" •',40):F0R 1-1 TO 20iL0CATE <I,1):PRINT AiiNEXT I 
L*="UQUS HQURREZ L£NT£HEWT":GOSUB 243:PAUSE 2 
L*="UOUS ETES HORT"[CLS "MBB":GOSUB 243(L*»"M0RT" [RETURN 

I BANOE TEXTE 

TCH«="4aoC£-7B8EBF35934D70F9930491D82A63431AD3DuBEB" 

IF TCH-1 THEN TCH*-"238A78CF5F13EBBCCCFF94**54B14085B4CBDBD1779E" 

IF TCH-3 THEN TCH*-"139583030F633B9807E76B23FAC9ACE397B19D2DAA7C" 

IF TCH=5 THEN TCH*="3B43O43eiBECD334F3ED2BB977E4C0ECBO5173F7C41A" 

IF TCH-7 THEN TCH*-"C50393BOA5BBO9BA0475BCC00BF9891F7FE3E0F151CD" 

CALL SPEECHC'L,"tTCH») 

LOCATE <21,1)[CALL COLORC'OBH") [PRINT RPT»< CHR«< 12) ,40) 

0-1*INT<20-LEN(L8)/B> 

FDR 1-0 TO [i.LEHil.>i-i :CHLL COLOR C'ORR" ): LOCATE (21,1) 

PRINT " "1CALL C0L0R("OCB")lLOCATE (21,I):PRINT SEC»(L*, 1-0. 1 , 1 > : 

PAUSE UCALL 3PEECH("A,"ITCH«>[RETURN 

1 DESSIN HONSTRE 

COSUB 179:L»="UN HONSTRE SURCIT All BOUT DU COUL0I 



GOTO 2*8 
GOTO 248 
GOTO 248 



EXELVISION-EXL 100 




SPECTRUM 
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.6 PRINT | PRINT -CONCLUSION 

;rint uotbe KRfOSfiSFloE IS] 



718B 6rint 
8, 'ChritU- 

7iie for ' 

722B PAUSE' 1«5'. -. - . 
738B 00 5UB_96aj ^SO^SUf 8638 



I FOR 1=1 TO 15:CALL C0L0R("1Yft") 
. C0L0Rt"1BR"):L0CATE (5,20) 
LE HONSTRE APPROCHE, TIREZM 

. COLOR("1RY"):L0CATE (5,20):PRINT CHR»( 34 ) ;CHRt <35 ! 
™ 15:CALL CDL0R("1YC"):LOCATE (3,13) 



LOCATE (3,20) : 
PRINT CHR»(9); 
!":GOSUB 243 



CHR«(7) 
CHR»(3l 
CHR*(3) 
CHR»<7! 



CHR«(8) 



■:LOCATE (10,i 
i:CALL COLORC 
■:LOCATE (3,1J 



:LOCATE 



3 PRINT CHRK5) ;CHR»(E)( 

I PRINT CHR*(1 ) ;CHfi'»(2) ; 

5 PRINT CHR«(1),CHRt(2)i 

• PRINT CHR»(5);CHR*(6); 

' IF B=0 THEN GOTO 279 

3 CALL KEY1(J,K)iIF J( )32 THEN GOTO 279 

3 CALL EXEC(5088B) 

) DATA "384FOA7BOBOA790OO9FBOA" , ,, aoOA1D0142B^2D208A8C05E4^3B&80A4CC2E5080Ee2A , 

I DATA "1210757902A2C30B40D113014eOAe30043633A20530F034435E1BO£C021550AC8502" 

! DATA "B2F15440e6EE02B82E4300C9650A20730F064433C980643D091 0932701 52F02440F4" 

i FOR K=1 TO 10:L0CATE <21 -K,20) :CALL COLOR( "OBC" ) :PRINT CHR»(1) 

i LOCATE (21-K,20):CALL COLOR( "ORG" ) :PRINT CHft*( 1 ) lLOCATE (21-K,20) 

! CALL C0LOR< "OCC") iPRINT " "iNEXT K 

; FOR K-9 TO 11:L0CATE <K,19)iPRINT " "iNEXT K 

i Lf'BRAUOH! UN HONSTRE DE ftOINS" : COSU& 243:B-0 

3 L«-"AVANCEZ OU FAITES OEHI - TOUR" : GOSUB 243iRETURN 

1 NEXT I: IF CH-51 THEN 263 

) L«="LE HDNSTRE VOUS A OEUORE.WOUS ETES HORT " 

I CLS "U8B":C0SUB 2*3:L»="H0RT" [RETURN 



DESSII 



HONTEE 



OBB">:PRINT ' 



i GOSUB 173:CALL COL0R( " 1CR" ) :LDCATE !Z, 20) iPRINT CHR«(23) ;CHR«(24) 

i FOR 1-1 TO 7iCALL COLOR( "1CR" ) :LOCATE <2nl t 1 ,20-1) iPRINT CHR*(2S); 

' IF 1-1 THEN CALL C0LOR("1CR"):PRINT CHR«<26 ) [CHR*(27) ; :GOT0 2B9 

! CALL CDL0R("1bC"):PRINT RPT»(CHR«(3E) , 2«I) ; 

1 CALL C0L0R("1CR"):PRINT CHR«(2B) : LOCATE (2»It2,20- I ) :PRINT CHR»(29); 

) CALL COLOR* "OCC") [PRINT RPT«<" " ,2«I ) j iCALL C0LOR( "1CR 1 ') [PRINT CHR*(30) 

I NEXT I[LDCATE (17,13* 

! CALL C0L0R("0btJ"):PRINT RPT«<" ", 16) :L*-"HDNTEZ OU FAITES OEHI-TOUR" 

] GOSUB 243:RETURN 

1 ! 

:■ I TROU DANS COULOIR 

' COSUB 179 

3 CALL C0L0R<"1BR")iF0R 1-9 TO 10[L0CATE (1,17) [PRINT " ":NEXT I 

3 LOCATE <11,17>:PRINT " ";CHR»<23) i [CALL 

) CALL C0L0R("1BR")[PRINT CKRX2*);" ":CALL COLOR 

I FOR 1-9 TO IOiLOCATE Clf 19> IPRXMT " "[NEXT I 

; L»-"WOUS POUWEZ FA1RE OEHI-TOUR" [COSUB 243:RETURN 

i > OESSIN DESCENTE 
i ! 

i COSUB 179[CALL COLORCORR": 
' FOR 1=7 TO 1*:L0CATE (1,26 
I FOR 1-15 TO 17:L0CATE (1,1 
1 FOR 1-6 TO 12iL0CATE (1,20 
! J-21iF0R 1-1 TO 6[J-J-1[IF 
I LOCATE (I.12,J)iCALL COLOR 

> PRINT RPT»(CHR»(20) ,40-2»j: 
3 L* = "Ci£SC£NBEZ DU FAITES DEH] 

! I PORTE CODEE 

' GOSUB 179:CALL COLOR< "Obb" ) 

i FOR 1=9 TO 171L0CATE (I,13):PRINT RPT»(" ",1£)iNEXT I : CALL COLORC 

3 FOR 1=3 TO 17[L0CATE (I,20)[PRINT CHRK34) ;CHR»05) (NEXT I 

> CALL C0L0R("0Hb"):FJ3R 1 = 12 TO 14:L0CATE (I,13):PRINT CHR*(1) 
I LOCATE <I,22)iPRINT CHR»(1):NEXT I 
; L«-"MOUS ETES DEUANT UNE PORTE CODEE":GOSUB 243:RETURN 



i:PRINT RPT«(" ", 2.1-10) :NEXT I 

SPRINT RPT*<" ",20):NEXT IiCALL COLORC'IR' 

T.JMT CHRt(34>;CHRt(35):NEXT I 
'3 THEN J=J-1 

ICft"! sPftINT CHR*(23)i[CALL COLORC'IbC") 
;CALL COL0R("1CR")[PRINI CHR»(2«) [NEXT 1 

TOUR" :GOSUB 2*3 [RETURN 



SORTIE 



326 GOSUB 179ICALL 



TO < 



{("occ"; 

(I,1)iF 



■■; : :■• 



RPT«C ",*0)[NEXT I 

NT RPT«(" ",12):NEXT : 
:G0SU8 2*3:L«-"UIUE U 



32B FOR 1=7 TD 1*iL0CATE 

323 L(="UOUS flUEZ GAGNE, &RAUO I 

330 CLS "bRR":CALL COLORC-ObRLHF" ) 

331 LOCATE ( 1 1 , 16) :PRINT "GGAAGCNNEE- 

332 PAUSE 4 [RETURN 

333 I 

034 ! SDNORISATION 



; FDR 1=1 TO LEN<L«)STEP 2 

• E=ASC(SEG»(L«,I,1))-4B:IF E)9 THEN E-E-7 
I FnASC<SED*(L«,I.1,1))-4B:IF F)9 THEN F=F-7 
1 CALL P0KE(K,1G«E.F):K-Kt1[NEXT I:RETURN 



LIBERTE!"[G05UB 243 



1Z,16)[PRINT "GGAAGGNNEE" 




I CIRCUIT DEflONSTATION 

N0=N0+1!I=1ZB:IF N0=4 DR ND=B THEN ] 

IF ND=2 OR NO-7 OR NO-12 OR NO-20 OR N0=21 THEN 1=131 [RETURN 

IF N0=3 OR N0=9 OR N0=^11 OR NO-14 OR N0 = 16 OR N0=1B THEN I-129[RETURN 

RETURN 



'130 [RETURN 



DEEP .5,1 



7B16 F 



[RIWEZ- 



15 .> 



) PRir 



PLU5 nfllliJA 



.. . . ■ r"" 

EST L UNE C 
I5E DC L-flNNE-.yBut 
iMBNT FfilOC BgflUCOL 



ICI^l 

■uotre'score" est ■■ , t 
13 suez parcouru 

,NE U0U3 BESTg QUE 



UOTRE PEG 



■'.:■■:.. -sioM ■■ . paI^ 

FOOHPMCE EST LA MEII 

ANNEC MAIS WUS POUUEZ SUREI1ENT 
•'■IEiJX . " . RETURN 

73is pause sao print pt b^h,' 



RRIMEZ 
7SB8 



PAUSE i: 6LS' 



7B38 IF INKEYI- 
THEN 00 TO 7^! 

7e*5 00 to 7aai 

73E8 CLS FOR 



786B IF INKEVf.-O- OR : 

THEN RANDOMIZE U5R £ 
7B7B INK 7: IF I'-.-.E'l* 

£<*••« t»e« e vn a 

7B7B IF INKEYI-'P" OR : 
— 73?B 

Z23* .. 



Vqucme.- RRusfe 

aa 5EC0N0ES n portir du beep 

INilOF OTNSI OUE 13 TIPS BQUR O 

■ FINS,'' 00 SUB 9S*B 

96S8 PRINT RT 16,8. 

■spPlpve; Sun UNB TOUCME- PAUSE 

7380 RETURN 
BB88 FOR /»B ■ 
BEEP S.Zi.i? 
O Sue 75B8 
8018 INK 8 CI 

E aao,aa,i ni 

683a FOR (-8 ■ 

aesa let it>i*\ 



LET \.Z 

eias if iNKEf »<>■■■■ THEN 

6138 LET ty.(l|+I 
8148 LET IiS-lPJ ■■ .1 
814S IF tPl>>B THEN BEEF 
GO TO 9588 

eise if ty-ae and attr ■ 
a and atto <ix ,aai <>7 ti- 

B178 IF tiJ^SB ANO ATTR 1 

THEN GO to 98B8 
a 181 SO TO 8868 
J8B8 PAPER 8. FOR 

circle aaB.sa.fl "next' 

~'~ CLS INK 7 

SO SUB 9817 



saea pause aaa — 

9588 FOR f.7 TO 8 STEP 

[F 8.3'tSIn 00"fb 9988 
l-utl. SO TO B818 
■ 58, INK 1 FOR I '8 TO 
! PLOT " 



S518 LET 
S618 PAU^ 
B8 STEP J 

5 plot e, 

3615 RETUA' 

ssaa for i 
ot 178, iai 



58 BEEP .',0; ■ 
' NEST I CLS ■ G 

i.s STEP S. CIRCL 



9813 so ;.. . 

9814 FOR i~-8 1 

98is so to 98ae 

9B17 PCINT -yc— 
nTOouS SCREZCf 



to as STEP 5 
- NEXT I 

BEEP .82,38 



ita ;; ' 



.18 TO 8 a- 
ORAU Bi.il 



;TEP -18 PL 



) 8 STEP -3. 



ORRU 188-1.68. NEXT i 



9553 RETURN 
3788 RESTORE 9" 



973B DATfi - JT 

9738 FQR (.8 TO 1: PRINT INK a, I 

T 21.31, -*;;,AT a,31,"S"; PRINT I 

LET*«iU6R 33388: NEXT ' ( ' 
97*8 FOR (-1 TO 9: PRINT INK S;i 
T 31. 31, ■*', RT 8,31,-tt": PRINT I 
T 13, la;" fe»". BEEP 9.B4,a8: Lt 
T wmUSR 2358B NEXT f 

97sa -or r-i to 11. beep -84,aa 

PRINT INK i.BT 8,31. -i", AT ^ - 

1,-fc- i-ET U=USR a33B8- NEKT 
97.65 PRINT "- " " "- ■■ 

977a PAUSE 



ii.6 



BSAUO.- 



9Bie 00 sub ssaa co sue 9638 

SUB 3658 PAUSE 388 OLS 

9819 RETURN 

9828 PRINT AT 11,11,"^,- CO TC 
9788 

3288 00 TO 9261 

9981 FLASH 8 BORDER 8 PAPER i 

CLS INK 7 

iie for n-i to *a 



888 SO 
898 OLI 



2S a ,S, 



6868 IF 1^ = 12 TM 
8861 00 TO 6109 
31BS PRINT AT t< 

• 6^1; "#"T LET P P 



¥»', 



3934 LET . -123'38»C0S in 
Hit LET Y«S6-*3tSIN i n / 
3238 CIRCLE v.",*8 
i-i-.:- :;: - ■ 
32sb_print ink a, flash 



■a*tPji 




9715 DATA 



AMYTIVILLE 



Voici un (petit) jeu d'aventuresfNDTA : Ca change des 
envahisseurs et des hommes paquets !) qui vous em- 
menera a I'interieur d'un manoir bien etrange. Votre but 
est d'en sortir. A vous de trouver lunique moyen. 

N. GOHIN et X. LERAY. 

Mode d'emploi : 

C'est pas comptique, neanmoins. ce jeu a ete ectit pour une utilisa- 
tion avec une carte 80 colonnes. II sulflt de taper PR # 3 avanl de 
r le jeu. Si vous ne possedez pas 80 colonnes . vous devrez 
effectuer quelques modifications dans les tabulations afin que I'afti- 
chage soil presentable. 

(NDTA : Nous vous conseiltons de taper ce programme pour fairs 
jouer vos amis. Ne regardez pas I'ecran lorsque vous taper le lis- 
ting, car ce serait trop tacile de deviner la solution... et encore...). 






20 REM . OMITWlLLE.il 

!3 REM * 

]< IDE XAV1ER LERAY 

10 REM * ET NICOLAS GOHIN 

15 REM ••■•••••m«**«««»»™ 

,0 REM •■■■ •■titaaaitta 




APPLE 




- DATAS PRESENT 



DATA 1415,-1,1397,201,137 

6,1 , 1 593 , 20 1 ,1613,-1,1398, 
204 r 157o ,1,1592,203 
'5 DATA. 1415,-1,1599,204,1 

574,1,1591,193,1415,-1,1400, 
197,99,,, 



340 PRINT 'Uous n* pouutz pUi 
sortir.": PRINT : PRINT ■ ]■ 
iB»<3>: PRINT " 2'{»(4)t GOSUB 
160 i GOTO 345 

341 HOME : PRINT : PRINT 'Uous 
ttn dans li HALL.': PRINT : 

PRINT ' I"|W(3)t PRINT ■ 2 
■;B»<4): GOSUB 140 
349 IF I ■ 1 THEN SOB 
370 IF I * 2 THEN 400 
3B0 GOTO 330 
395 REN *•••»••»•••»«• *** 

394 REM PIECE UIDE 

397 REM MWHHHHWHHHHMHHHHWH 

400 HOME : PRINT : PRINT 'Vous 

410 PRINT i PRINT ' I'jBtCl): PRINT 
" 2';B*<3>: PRINT • 3*;B*(4> 
i GOSUB 140 

420 IFI'3 THEN 1000 

423 !F : = 2 THEN 341 







































493 




20 


FOR I - 1 TO 22: READ B*(I) 














21 


DATA ' Vous alltz au nord 




un tscalltr qui ntm au Itr 




s alltz * l'tst" 




ttagt.': PRINT : PRINT ' I" 








' 3';et(5>: GOSUB 160 






310 


IF I - 1 THEM 350 


lso- 




520 


IF 1 = 3 THEN 2300ELSE GOTO 


24 


DATA ' Vous atttndiz',' V 
































%^ U r?»n'° U9( ''" yOUB " f " 


344 




24 


DATA ' Uous pirttz',' Uo 


350 


HOME : PRINT : PRINT 'Uous 












-(St*, 1 Uous alltz au ctntr-t 


393 


IF BR = THEN PRINT 'Uoui 


2B 


DATA ' Uous alltz au sud 


540 


1 table. - 
PRINT : PRINT ■ l'|B»(l)l PRIN1 




^ts , ous * *i nor outs 




' 2"[Bt(2): PRINT " 3 a ;B*<3) 












rt-outsf,* Vous alltz iu su 


343 


GOSUB 140 














347 


IF I - 3 THEN BOO 






370 


IF I - 2 THEN 300 






373 


IF ! - 4 AND BR ■= THEN BR 








= 1: PRINT 1 PRINT A*: FOR 


33 


DATA ■ Uous ranasstz l'o 




1 = I TO 2000: NEXT j GOTO 5 
30 




























-uous •;•■ GET W:I - UAL (0 


3*2 


REM BUREAU 




(): IF Q» = '0' THEN PRINT 








: PRINT : PRINT ■ Uous posse 








dtz ■ ,PC;- pilic, d'OR.'! SOTO 


600 


HOME : PRINT : PRINT 'Uous 




140 




ttts dans un bui-tau. 11 y a 




IF I = THEN 140 




une arnoirt.': PRINT : PRINT 


at 


RETURN 




' l';M(2)i PRINT ■ 2'[B»(I9 


00 


HOME : PRINT I PRINT -Uous 




): GOSUB 140 






610 


IF I - 1 THEN 400 




at, Votrt uolturt tonbt *n p 


613 


IF I ( ) 2 THEN 400 






620 


HOME : PRINT : PRINT 'L'irs 


10 


PRINT 'La nuit cmatnct 1 t 












stent.": PRINT 




, uous uoytz un MANOIR.' 


623 


PRINT 'Vous uous rttrouvti 


20 


PRINT : PRINT "Un uioltnt o 










630 


FOR 1 - 1 TO 3100: NEXT : GOTO 


230 


PRINT : PRINT ' 1 Uous uous 
dirlgtz utrs It MANOIR': PRINT 
' 2';BStlD): GDSUB 140 


690 


2000 




MHMMM 


JU 


IF I - I THEN 300 


692 


REM SALLE A MANGER 


111 


IF I < ) 2 THEN 200 






4(1 


HOME : UTAB 4: PRINT *Un tc 


694 


REM *«<H>»t»»*t*ta>Mtattt 




"Cslul-ci UOUS tomtit dtssus 


700 


HOME : PRINT : PRINT *VOOS 
ttts dans la sallt a nano.tr. 


I'M 










■UOUS M0UWtE2 '.'.•• 




tt.'i PRINT : PRINT " 1 Vous 




















dtuant la ports d'tntrtt du 








MANOIR. ' 






Jl« 












720 


IF I - 4 THEN BSD 


Ji>u 




723 


IF I - 1 THEN PRINT A*: FOR 




4t PRINT 'Un tclair uous fou 








droit. Uous ttts brutt ul* ! 








*: GOTO 270 






m 


IF I < > 2 THEN 300 






14 li 


GOTO 333 






J45 




745 





75D HOME : PRINT ■ PRINT 'Uous 



755 PRINT 'II 



I. 1 ; PRINT 
•;B*<3>: GOSUB 



IF 1 • 2 THEN 700 
IF I ■ 3 THEN 2400 
IF I - I THEN HOME 
I PRINT 'Dtuant 1* pt 



FOR I ■ I 
1200 

GOTO 750 



TO 3000: NEXT : GO 



HOME : PRINT : PRINT 'Uous 
tts dans pitct conpltttntnt 

mfrt.'i PRINT 'Vous nt uor 
i stricttntnt rlm.'i PRINT 
PRINT ' l'iB*(l): PRINT ■ 
■;B*£3>: PRINT * 3'jB*C4>> IF 
1 = I THEN PRINT ' 4 Vous 



IF I - 2 THEN B50 
IF I = 3 THEN 550 
IF 1 < > 4 THEN 800 
HOME : PRINT : PRINT " 



: NEXT 
= 1 



: FOR I = 1 TO 2000 



3 FOR I = 1 TO 30: FOR J - I TO 
40! NEXT J HOME : IF K = I THEN 

NORMAL :K = 0: GOTO B4D 

4 INVERSE ;K ■ I 

HTAB 36: VTAB 12: PRINT 'BA 

OUM ! ! ' i NEXT I 
3 GOTO 270 



: PRINT *V 
': PRINT • 



IF 1 ■ 1 THEN 700 

IF I C ) 2 THEN B73 

IF I - 2 THEN HOME I PRINT 

: PRINT -Lt mirotr n'ttiit q 



PRINT ' 
: GOTO 1 



I TO 3000: NEXT 



IF I i 3 THEN 800 
IF 1 ( ) 4 THEN B50 
IF CL - THEN PRINT : PRINT 
I PRINT 'Au liltiiu dts boutt 



PRINT "La | 

: PRINT : PI 
I TO 2000: NEXT :CL ■ 
GOTO B30 



THEN PRINT 



•PINT : PRINT ' 



910 PRINT 'ou r 



IF R» 
IF R» 
HOME : 



: PRINT : PRINT ■ 



■R- THEN BOO 
) 'S' THEN 900 
•R1NT : PRINT 'En I 



PRINT : PRINT TAB< 2); CHR» 
(34>['LA COLLECTS DES PIECES 

D'OR UOUS SERA BENEFlDUE'l CHRt 
(3fl>: FOR I « I TO 3400! NEXT 

PRINT v l ' Ri " 1 ' ■ RRINT 'Vout 



HOME : PRINT : PRINT 'Vous 

■t PRINT : PRINT ' l'fB*C3>: 
PRINT • 2"iB«(4)t PRINT ■ 3 



1(5): C 



1010 IF ] ■ 



( 121 



2 THEN 1300 
1030 IF 1 ■ 3 THEN 400 
1040 GOTO 1000 
1090 HEM WllllllKlinill ll 

1092 REM ATELIER 

1094 REM itmmiii»H»«H 

1100 HOME i PRINT : PRINT 'Vot 
ttts d»ns un attl.tr. II > 



1110 PRINT ' 
2'|B*<2>: 

1115 GOSUB 140 
1120 IF I = 1 THEN 1200 
1123 IF I - 2 THEN PRINT : PRINT 
'Uous rtnonttz au rtz-dt-cha 
t passagi sic 



I GOTO S 
1130 IF I = 



: FOR I = 1 TO 2200: NEXT 

3 THEN 1400 

> 4 THEN 1100 
PRINT : PRINT : PRINT 



1143 PRINT : PRINT ' 



1180 



A = 1 THEN T = 1 
1 - 2 THEN SM ■ 1 
A ■ 3 THEN PB ■ 1 

1183 PRINT : PRINT : PRINT A 
I = I TO 2000: NEXT 

1185 GOTO 1100 

1190 REM ii.iiii.iiiH.ini 



1200 HOME : PRINT : PRINT ' 



GRAND GARAGE 



1300 HOME : PRINT : F 



T = THEN PRINT ■ 



1313 IF MT = 1 THEN PRINT ' 3' 
;B«(1) 

1317 GOSUB 160 

1320 IF I = I THEN 1000 

1323 IF I = 3 AND MT = 1 THEN I 
300 

1327 IF I = 3 AND MT - 1 ANO PI 
o 1 THEN 1550 

1330 IF 1 < i 2 THEN 1300 

1340 IF NA ■ THEN HOME : PRINT 
I PRINT I PRINT 'Uous nt pos 
stdti pas d'armt.': FOR I » 
1 TO 2S0Q: NEXT i 00T0 1300 

THEN HOME i PRINT 



: PRltr: 



'RINT ■ 



: FOR I 



I TO 



: FOR 1 = I TO 2IO0: NEXT 



I3S5 U 



PETIT COULOIR 



GRAND COULOIR 



I3B7 IF FF ■ 1 THEN 1000 

1390 GOTO 1300 

1395 REM •*t«Htitt*tititit*at 

1394 REM CHAUFFERIE 

1397 REM Htm iH HH tl l l llH 

1400 HOME i PRINT : PRINT 'Uous 
ttts dtns It chiufftrit. Uo 

us uortz un pttit plicird *u 

rat.': PRINT 
1410 PRINT ■ !-;6*<3>i PRINT ■ 

2-;B*<l9>t GOSUB 140 



A suivre : 

En raison de la longueur 
inhabituelle du listing, 
nous passerons ce pro- 
gramme en deux fois. . 



1420 IF I = 1 THEN 1100 
1430 IF I ( > 2 THEN 1400 
1430 IF RND -l i ) .3 ANO 01 ■ 

THEN PRINT : PRINT "Uoui 

y trouutz 7 pitctt d'OR. Vou 
s Its prtntz.'iPO ■ P0 * ?:: 

01 - li FOR I - I TO 2000: NE 
I GOTO 1400 

1440 PRINT : PRINT 'Uous uous > 

art i du our,-: GOTO 270 



141 



492 REM PORTE 8L1NDEE 

494 REM »»t»»t«tt»»tttt*ttttt 

500 HOME : PRINT : PRINT 'Uous 
ttts dtuant unt portt blind 
INT i PRINT • 1"| 



2)> 



■ THEN 



PRINT ' 2 Uoui lorctz I 
rtt tutc It pitd-dt-l 
1510 GDSUB 160 
1320 IF I - I THEN 1300 
1330 IF I - 2 AND PB - ! 

- THEN PI - 1: GOTO 1330 
1540 B0T0 1300 

1543 REM •••tsttttittiiitttts. 

1544 REM LABORATQIRE 



Pt 



136D PRINT : PRINT TAB( 31; CHR« 

(34)'POUR SORTIR, UOUS DEVEZ 
THDUVER SUFF1SAMENT DE Pi EC 

ES D'OR POUR FABRIQUER' 
1362 PRINT 

1343 PRINT TAB( 4)'UNE CLEF 0E 
CE METAL, QUI UOUS PERMETTR 

A AL0R5 D'OUURIR T0UTES LES 

FORTES'; CHR* (34) 
1370 PRINT : PRINT 'II ■■ a auss 



1300 PRINT 'la nachint a fondrt 
Its nttau-.': PfllNT : PRINT 
: PRINT ' l'iBK2>: PRINT " 
2 Uous uous approchtz dt la 
ttblt': PRINT " 3 Uous uous 
approchtz dt U oailUsst' 

1383 GOSUB 140: IF I = 1 THEN 1 
300 

1590 IF I • 2 THEN 1430 

1400 IF I < > 3 THEN 1500 

1410 IF P0 < 40 THEN PRINT : PRINT 

ut marchtr.': FOR 1 - I TO 3 
000; NEXT : GOTO 1330 
1620 PRINT : PRINT 'Uous introd 

a machint.": PRINT 'Appurtz 



■ttrt 



1437 S ■ - 14334: FOR I ° I TO 
300lX = PEEK <S> - PEEK (S 
) * PEEK (S) - PEEK <S> t 
PEEK (S) - PEEK (SI: NEXT 



1440 PRINT • 



1440 PRINT I PRINT ' Unt 
n OR pist 400 grannts. 

1470 FOR 1 = 1 TO 4000i r- 



PETIT BUREAU 



2000 HOME I PRINT : PRINT "Uous 
ttts dans un pttit burtau. 
II y a un passagt stcrtt a I 
'outtt'i PRINT : PRINT ' 1'] 
B*(I): PRINT ' 2-;B*(4>: GOSUB 
140 

2010 IF I - 2 THEN PRINT : PRINT 
: PRINT 'Uous rttourntz au r 
ti-dt-chauts't.': FOR I - 1 TO 
2000: NEXT I GOTO 400 

2015 IF I ( ) 1 THEN 2000 



PETIT COULOIR 



A SUIVRE.., 



LE LOGPCIEL DE LA SEMAINE 



SPY HUNTER par SEGA 
pour COMMODORE et APPLE 



DOU DOU DA DOU DAM 
DOU DA DA DOU DOU DA 
DOU DAM DOU DAM DA 
DOU (bis repetita). Pour ceux 
qui n'onl pas reconnu ce mo- 
numenl cte la musique conlem- 
poraine. ils n'onl qua partir a 
ia recherche du lanlastique jeu 
de cafe du meme nom. 

Seul a la tele de mon vehicule. 
un leger riclus courbant mes 
levres. je fonce. Je lonce plus 
vile et plus loin que lous les 
autres. L'Antifrance agit sur les 
autoroules et les rivieres. A 
moi de les elimmer, de leur 
faire quitter la route et par la 
meme leur suggerei une visile 
en enfer. Defilanl de chaque 
cote, les arbres rythmenl ma 
course sans (in, ma fuite eper- 
due a la recherche du kilome- 
tre perdu. Parfois, mon assis- 
tance technique m'attend au 
detour dun virage, me laissant 
quelques secondes de repit. le 
temps de recharger mes di ver- 
ses armes. Du nuage de 
brouillard au missile sot-air en 
passant par I inevitable mitrail- 
leuse et la non moins connue 
tache d'huile. j'ai de quoi occu- 
per la galerie pendant plus 
d'un film. Bien sur tous les 
moyens sonl bons pour ces 
espions venus du troid : du 
pont detruit a I'helicoptere lar- 
gueur de bombes. de la votture 
barrage aux puissantes limou- 
sines des truands, tous les 
pieges se dressent sur ma 
route tentanl d'achever par 
quelque mouvement trailre ma 
si brill ante carriere de chas- 
seur d'espion. Et toujours ce 
leitmotiv pour m'accompagner 
dans cette quete : DOU DOU 
DA DOU DAM DOU DA DA 
DOUM... La musique adoucil 
les moeurs disent-ils. pour ma 
part j'aurais plutol des envies 
meurtrieres : degager tout le 



Tout a mon aventure d'espion 
anti-espion, je vogue dans un 
decor digne dune production 
de Cecil B, de MILLE : cou- 
leurs eel a tan tes el b as- cotes 
mouvanls, rapidite d'action. lie- 
vre de I'echec repete et pour- 
tanl evitable, et toujours cette 
melodie obsedante. La realisa- 
tion que nous offre Bally Mid- 
way (autrefois specialise* dans 
tes billards electriques) est 
dune remarquable qualile : 
hen ne peche dans ce logiciel. 
du graphisme au son (reussi 
meme dans la version pour 
Apple ce qui denote un effort 
de presentation certain) en 
passant par linteret du jeu. 
Tous ceux qui connaissenl le 
jeu de cafe le retrouveront 
avec plaisir et passion sur leur 
micro, et pour les autres un 
univers fantastique se presents 
a leur porle. pret a envahir 
leurs loisirs pour quelques se- 
maines au moins. Un produii 
exceptionnel a ne pas man- 
guar. 

Jack BOND 




PEPE LOUIS CONTRE LE GANG DES PUCES ! ITienU 



EPISODES 



RESUME DES 
PRECEDENTS : 

Apres avoir lente de convaincre 
Steve Jobard de laccompagner a 
Paris. Pepe Louis doit encore deci- 
der Jack Tramolo et Clive Sans- 
clerc L'Ombre Verte vent gu on lui 
livre ces trois hommes en lechange 
des vingt jeunes femmes qu'il a kid- 
nappees. 

Seme EPISODE: 
DU RIFIFI 

CHEZ ATRAHI 

Mick Bidouille esl un incroyable 
maladroit II na rfetl irouve de 
plus subtil que de titrer en gras I 
"L'OMBRE VERTE VEUT S'EM- 
PARER DES TROIS PLUS 
GRANDS MAGNATS DE LA 
MtCRO-INFORMATIOUE 1". II 
est fou ! En etalant tous les de- 
tails de laffaire a la Une du Wa- 
shing-Machine-Post, il risque de 
compromettre mes efforts ! Je 
ne dois plus perdre de temps el 
quitter I Amerique a toutes 
pompes en emmenant Jobard el 
Tramolo dans mes valises. 
Les hotesses de chez Atrahi 
sonl aussi epoustouflantes que 
cei'es d Appoil. Eiies sonl habil- 
lees en jaune avec un bonnet 
en forme de PacMan. Le genre 
de filtes qui Irouveraient imme- 
diatement du travail dans la ca- 
ravane du Tour de France, entre 
le Bibendum Mich el in et ta Mou- 
che Geaote de Flyton. Je m'an- 
nonce sobremenl. et par respect 
envois mon grand age. on ne 
me fait pas attendre. La plus 
!•-.-'■ d'ontre elle m 'invite a la 
suivre dans un couloir en lorme 
de labyrinthe. Nous croisons 
douze secretaires habillees en 
tantomes et qui font mine de 
nous devorer en (aisant bloub 
bloub avec leurs grandes bou- 
ches. A chaque coin de couloir, 
I'hotesse s'arrete et avale une 
pilule bleue. 

- C'est pour me proteger de ces 
fantdmes, explique-t-elle en cli- 
gnant de I'oeil. 

Le bureau de Jack Tramolo est 
au centre du labyrinthe. Nous 



- Come m old Boy Pepe Louis ! 
Faut que je me fende dun des- 
criptil sur le physique du person- 
nage et sur letal des lieux car 
I' ensemble torme un tout assez 
curieux. 

Tramolo est plutdt grand et 
obese. Son crane est lisse 
comme la piste 9 d'Orly Ouest. 
II a I'oeil noir el petillant enfonce 
dans un chapelet de cernes vio- 
lettes. Sa bouche est fine et 
aussi large que celle de Barzy 
dans le Beberte Show. Dans sa 
grosse main pole lee cou verte de 
bagouzes. il tienl un cigare gros 
comme un tronc d'arbre. Mais le 
plus etrange est sans conleste 
son habillemenl : il est veto 
dune enorme barbottiere de 
bebe rose avec un bavoir autour 
du cou, II a des petits chaus- 
sons a dentelle autour de ses 
gros pieds. Enfin ii tient un ho- 
chet dans I 'autre main et il est 
assis dans une chaise d'enfant 
aux proportions gigantesques. 
Dun geste de la main, il m'invite 
a m'asseoir sur un pouf enloure 
de jouels qui trament sur la mo- 
quette en laine a longs poils. 

- Un jour, je serai le mailre du 
Monde et des ordinateurs. Pepe 
Louis. J_' les racheterai tous un 
par un et nous lormerons le plus 
grand trust informatique que la 
Terre ail jamais porte 1 

Dans ma longue carriere de de- 
tective informaticien. j'avais deja 
eu loccase de croiser Tramolo 
une fois ou deux. Mats sa me- 
galomanie ne selait pas arran- 
gee avec les annees. Le bon- 
homme est a fa lois sirupeux, 
tyranique et lascinant. 
-Jack, dis-je en eca riant un 
Gremlin en plaslique d'un coup 
de canne. je suis venu vous de- 
man der un service. 
Je joue franc-jeu et je lui deballe 
I'histoire de lOmbre Verte par le 
menu en meltant bren en avanl 
le calvaire des vingl jeunes 
femmes enlevees a I interieur de 
leurs machines a laver. des 
Branques. et qui doivent 



commencer a irouver le temps 
long. Meme si les lambours sont 
conlorlables. 

Il avate gouiumem vingl Gemi- 
ni elres humides de son cigare 
et les ressori en les (aisant glis- 
ser lenlement dans sa bouche 
en torme de cul de poule. 

- Harry Kong ? C'est bien lui 
I'Ombre Verte ? queslionne-t-il 
en souriant. 

J acquiesce du beret. 
-Je connais bien ce gars. Pepe 
Louis, poursu it'il. Deouis des 
annees il monte des coups loi- 
reux. II rate partoul oil je reus- 
sis. Mais javoue ne plus avoir 
entendu parler de lui depuis 
longtemps. Je pensais qu'il etail 

Un (ilel de salive degouline du 
cigare et tombe sur le bavoir. 

- L'Ombre Verte doil vous en 
vouloir a mod. C'est sans doute 
pour ca qu'il veut vous lenir en 
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A VOS CONSOLES Tl 99/4 ba sic etendu disponibl e 
««= **_ T.I. logo N° 2 disponible 



195 F a 
230 F a 



CONSOLES ET ACCF.SSOIRES Tl 99/4 

Mtcro-ordlnateu! Tl 99/4A Pal 

Modulotetir Secam France 

Modulaieuc Pertlel 

Coble liaison magnelo cassettes 

Magneto cassettes Texas Inslrumenls 

Magnelo cassettes Lansay / Conmieui el coble 

fmprlmante SelKoscho GP 50 A 

Imp rim ante Sefhoscno GP 500 

Im prim ante Epson RX60 friction /traction 

Machine a ecrire Brother EP 44 a memolie 

Interface paraiiele exierieure paur Tl 99 

Inlertace setle exterieure pour Brolher poui Tl 9 

Extended Basic manuei frangals 

Manette de jeux Super Joy a veniouse avec 

Inlertace spectale suoportont 2 manelles 

Manette Quick Shot II a ventouse Tir bloque 

avec adoptateur pour 2 manertes 

PBOGRAMMAT10N 

Extension memolre 32K exterieure 1 340 f □ 

Tl Logo n° 2 en Irancais disponible (Module) 895 F U 

Mini memolre liviable ovril (Module) 895 F □ 

K7 EPSILON/SOFTWARI POUR Tl 99 BASIC ETENDU 

Lunar Lander 2 simulation de vols spatlaux 95 F D 

Lunar Jumper motodet'espoee 120FD 

Solar systeme pltotogeo la carte en 3 dimensions 120 F l~l 
Sum Games (les Jeux otymplques) 1 20 F D 

• K7 Lunar Lander 2 + 2A1 L'ensemble 260 FD 

K7 HEBD0GICIELS SOfTWARE POUR Tl 99 

N° 3 rubls sacre Basic etendu 

H° 4 6 jeux donl Dark Crystal Basic etendu 

N" 2 12 )eux donl Roland Garros Basic etendu 

MODULES TEXAS ORGANISATION 

Gesiion de tlchlers 260 F G. Gestlon de rappo 

Gestlon privoe 360 F D 

MODULES FUNWARE POUR Tl 99/4 

Rabbit Rail ; Driving Demon ; SI nick ; Ambulance 

L'ensembie ; 

MODULES R0MOX POUR Tl 99 

• Princess and Frag 9 nlveaux. module d'odresse ■ 
lous - Traverser I'atlee des cavaliers - Traverser le fleuve Infeste 
de crocos - R&issir o dellvrer la prlncesse - Le lout en 
musique, 1 20 F D 
■ Anieater 9 nlveaux - Un combat sans rnerct dans les gaieties 
creusees par les combattants - Acceleration foudroyanle n 
partir du 7* niveau. I20F □ 
a Rotor Raiders 9 nlveaux - Poc-Man dlabollque et en 
musique, 100 FO 
a Hen Pecked 6 nlveaux - Jusqu'a 10 ons un grand combat de 
coas en musique. 100 F D 




IS 375 F a 



LOGO 2 (module) 
Enseignez a voire ordinoieur i 
formes, couleurs, musique. 
procedures, corocteres dessinSs, 



i gr ommalicales et 
orittimeilques... 

La lortue se cleguise en souris 
habile entre vas mains el vous 
deveioppe logique el creatlvlte - 
journal de borfl - sauvegcrde 
possible de lous supports. + 
jmprlmanlB 

Promotion : le module logo 
+ memolre 32 Ko... 1995 FD 



BASIC ETENDU 

Module comprenanr un langoge de 
programmalion ren lor cant le Basic 
du Tl 99 .40 commonde5 suppie- 
mentaires, acces au langoge 
assembleur. (Enlr6es/sorties). 
Sous -programmes, s lockage, spri- 
tes, troifemeni d'erreurs. Expres- 
sions logiques. LET multiple. Intro- 
ductions multiples Acces o I'exlen- 
slon 32 K. 




MEM0IRE 32 K exterieure necss- 
salre pour I'ulillsation du basic 
etendu. 

Elle est Indispensable pour la pro- 
grammalion en logo.SI Ion possSde 



MINI-MEM0IRE 

1 module + 1 cassette, compatible 
extension 32 K, 

Ce module ne se contente pas de 
vous otfrir 4 Ko de memolre RAM 
(ollmentee par pile) perm errant la 
sauvegarde des programmes el 
donnees larsque vous eieignez 



LOT N°l INDISPENSABLE 

• Module BASIC ETENDU manuei en lr 

• K7 Basic par sol-mfime 

• K7 Lunar Lander 2 (slmulaiton de vr 
spacknuO 



a 4 Ko de memoire morie (ROM) et 
6 Ko de memoire mode grophique 
(G - ROM) conlenonl des ulilitoires 
Ires interessonl : 
-acces possible a lextension 32 K 

- chargemenl de progrommes- 
objelsecrlfsenassombleur, soil sur 
mini-memolre, soil sur extension 
32 K; 

- utilisation de PEEK el POKE, appe- 
als sous-programmes habituelle- 
meninonoccessibles; 
-programme de recherche 
d'erreurs (Easy Bug - Oebug), 
Avec la K7 : Assembleur llgne par 
liable el programme de demonstro- 
lion graptiique (LINES) tr6s puis- 
sant, "passe! la surmultipliee' sur 
votre Tl en vous otlront 4 K de RAM 
non volalile el les joies de fAssem- 



LANGAGE PASCAL comprenanl . 

La carle 9. code el tes disquottes Pascal 

USCO : Compiler. Assembleur linker; 

Edlleurlllef : 



PROGRAMMATIOH SUR DISKETTES 

Cottrei perlptieilque Texas : origin* USX 

comprenanl le ooliler. le controlem. 

el I'unltt de dlsquene ■ 5700 FU 




C0NTR6LEURS - LECTEURS DE DISQUETTES 360 Ko 

eCarie corlroleur enlictrable dons bollier peripherique 
(compailhle avec unites de disquettes Texos). 
Double face, double densite, 360 Ko. 
a Unite do lecture de disquettes 5' 1/4 SLIMLINE 360 Ko 
1/2 hauteur (2 lecteurs peuvent fenir dans le 
compartiment ■disquc" du bollier peripherique). 



6300 FD 



(livraison ovril) 
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CodtPostol — 


Vllk, 


sonl Indicants et MM 4lre tno 




Mm 


ProaulTs 


disponlbles dans lo llmlls de not stocks en moDoiin. 


Porticlpa 


nan aux rrals de Ron el d'eioealilnn en reajmmnnat 
K»ur les logicians : + 30 F. Se renselgner pour les colls 
s da 5 kg olnsl que pour les eipMitlon? d retronger. 


LARtfGLEACUCUl: 

65/67. DO Solm^emialn. 75005 PARIS 

141. ; 32568 88 -T««:ET1UV 220064 fl 13 


I3RAC. 






I uroisen das ptDdBlM aisM moles so 


sgjNri. 
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Dem under la lisle des modules de jeux. 





